r - 将向量中的值粘贴到 R 中的列名

Question

我想将向量中的值粘贴到数据框的列名中。假设文件有 4 列，tmp2 向量有 4 个值。for 循环工作得很好(新的 colnames 是 tmp 的值和 tmp2 的值一起)但我想用 apply family 函数尝试同样的方法

tmp <- colnames(file)

tmp2 <- c(1,2,3,4)

for(i in 1:length(tmp)){

names(tmp)[i] = paste(tmp[i], tmp2[i])

}

例如这样的东西

sapply(tmp,function(x,y){

names(x)<-paste(x,y)
},y=tmp2)

有什么想法吗？

Answer 1

您不需要任何循环。 paste 也是矢量化的。据我了解，OP 希望在所有列后缀上添加一个序列号。

试试看:

names(file) <- paste(names(file),1:ncol(file), sep = "")
# A1 B2  C3
# 1  A  1 101
# 2  B  2 102
# 3  C  3 103
# 4  D  4 104
# 5  E  5 105

数据

file <- data.frame(A = "A":"E", B = 1:5, C = 101:105)
file
# A B   C
# 1 A 1 101
# 2 B 2 102
# 3 C 3 103
# 4 D 4 104
# 5 E 5 105