我有一个有7个数据框的列表,每个人都有相同的列("DATE","PRECIPITACION"),所以我只想以升序的方式重命名第二列("PRECIPITACION"),即PRECIPITACION_1,PRECIPITACION_2,...,PRECIPITACION_7,我试一下这个
my.files <- list.files(pattern = ".csv")
my.files <- mixedsort(my.files)
my.data <- lapply(my.files,
read.csv,
header = TRUE, sep = ";", dec = ",")
对于我的特定DF:
data.Precip <- rbind(my.data)[1:7]
对于重命名第二列:
colnames(data.Precip[[1]]) = paste(colnames(data.Precip[[1]]), "1", sep = "_")
但上述代码仅适用于单个数据帧
对此有什么想法吗?
发布于 2018-06-07 06:11:43
您可以使用for语句使用当前循环索引设置顺序名称,然后使用列号更新第二列(不确定这是否是您想要做的):
for(i in 1:length(data.Precip))
colnames(data.Precip[[i]])[2] = paste(colnames(data.Precip[[i]])[2], i, sep = "_")
https://stackoverflow.com/questions/50729367
复制相似问题