Question

我正在尝试在我的网站的每个页面上都有一个library(dplyr) # version 0.4.3 # example dataframe dt = data.frame(mtcars) # CASE (a) # using top_n dt %>% group_by(am) %>% top_n(n=4,hp) %>% summarise(MeanDisp = mean(disp)) # am MeanDisp # (dbl) (dbl) # 1 0 402.500 # 2 1 223.025 # CASE (b) # using slice dt %>% group_by(am) %>% arrange(desc(hp)) %>% slice(1:4) %>% summarise(MeanDisp = mean(disp)) # Error: corrupt 'grouped_df', contains 8 rows, and 32 rows in groups # using slice and grouping again dt %>% group_by(am) %>% arrange(desc(hp)) %>% slice(1:4) %>% group_by(am) %>% summarise(MeanDisp = mean(disp)) # am MeanDisp # (dbl) (dbl) # 1 0 402.500 # 2 1 223.025元素，其中包含产品编号，然后有一个链接将该数字放在最后。例如，

div

然后在链接的＃后面添加id为＆＃34; productnumber＆＃34; 的元素的内容。

知道这是否可行？因为这会比编辑所有现有页面及其各自的<div id="productnumber">01101</div> <a href="purchaseurl">https://example.com/#</a>文件更容易。

Answer 1

检查Element.innerHTML。您可以使用一些内联JS并将其附加到href-Attribute（现在应该是id="purchaseurl"）

Answer 2

您可以为所有网页添加简单的脚本。

＆＃13;

document.addEventListener("DOMContentLoaded", function() {
   var productNumber = document.getElementById('productnumber').textContent;
  
   Array.prototype.forEach.call(document.querySelectorAll('a[href~="purchaseurl"]'), function(link) {  
     // if you want to change the link
     var currentHref = link.getAttribute('href');
     link.setAttribute('href', currentHref + '#' + productNumber);
     // if you want to change anchor text 
     var currentText = link.innerHTML;
     link.innerHTML = currentText + productNumber;
   });
});

＆＃13;

<div id="productnumber">01101</div>
<a href="purchaseurl">https://example.com/#</a>

＆＃13;

Answer 3

请参阅getElementById，getElementsByTagName和nextSibling。

var data = document.getElementById('productnumber'),
    url = data.nextSibling.nextSibling;

url.innerText += data.innerText;

<div id="productnumber">01101</div>
<a href="purchaseurl">https://example.com/#</a>

将数据从div附加到链接URL

3 个答案: