R 在列名中添加字母

我得到了一个包含六个变量的时间序列，我使用下面代码的第一行得到了它们的前导值，并用第二行删除了重复年份列。新数据有13列；一年，六个变量（称之为“集合1”）和六个前导变量（称之为“集合2”）

我需要将集合2的列名称替换为集合1的名称，并在开头加上“l”。我使用了第三列中出现的

stringr

包中的

stru c

函数，但它没有改变任何东西

我用另一个数据集测试了这个函数，效果很好。还检查了第三行的每个部分，两个都很好，但当试图将其中一个分配给另一个时，它没有给出任何结果；没有错误，也没有变化

s.ts<-sample %>% mutate_each(funs(lead(.,1))) %>% cbind(sample, .) # get the leading values beside the original
s.ts<-s.ts[,-8] # remove the repeted year column
colnames(s.ts[8:13])<-str_c("l", colnames(s.ts[2:7]))  # change the column names

s.ts%mutate_each（funs（lead（，1）））%>%cbind（sample，）#获取原始值旁边的前导值
s、 ts

colnames(s.ts)[8:13] <- str_c( "l", colnames(s.ts)[2:7] )

将新名称分配给此副本。这相当于：

foo <- data.frame(a = 1:5, b = LETTERS[1:5], c = rnorm(5))
bar <- foo[ 1:2 ]
colnames(bar) <- c("x", "y")
foo
bar

foo应该是

colnames(s.ts)[8:13] <- str_c( "l", colnames(s.ts)[2:7] )

将新名称分配给此副本。这相当于：

foo <- data.frame(a = 1:5, b = LETTERS[1:5], c = rnorm(5))
bar <- foo[ 1:2 ]
colnames(bar) <- c("x", "y")
foo
bar

foo应该是

colnames(s.ts)[8:13] <- str_c( "l", colnames(s.ts)[2:7] )

将新名称分配给此副本。这相当于：

foo <- data.frame(a = 1:5, b = LETTERS[1:5], c = rnorm(5))
bar <- foo[ 1:2 ]
colnames(bar) <- c("x", "y")
foo
bar

foo应该是

colnames(s.ts)[8:13] <- str_c( "l", colnames(s.ts)[2:7] )

将新名称分配给此副本。这相当于：

foo <- data.frame(a = 1:5, b = LETTERS[1:5], c = rnorm(5))
bar <- foo[ 1:2 ]
colnames(bar) <- c("x", "y")
foo
bar

它工作得很好。你能解释一下区别吗？为什么第一个例子适用于某些集合而不适用于其他集合？@AhmedSalhin请查看我的编辑，并解释您的例子在哪些情况下有效。请再看一看。它很好用。你能解释一下区别吗？为什么第一个例子适用于某些集合而不适用于其他集合？@AhmedSalhin请查看我的编辑，并解释您的例子在哪些情况下有效。请再看一看。它很好用。你能解释一下区别吗？为什么第一个例子适用于某些集合而不适用于其他集合？@AhmedSalhin请查看我的编辑，并解释您的例子在哪些情况下有效。请再看一看。它很好用。你能解释一下区别吗？为什么第一个例子适用于某些集合而不适用于其他集合？@AhmedSalhin请查看我的编辑，并解释您的例子在哪些情况下有效。请再看一看。