我有一个包含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 = "_")
但上面的代码仅针对个别数据框
对此有何想法?
答案 0 :(得分:1)
您可以使用for语句使用当前循环索引设置顺序名称,然后使用列号更新第二列(不确定这是否是您要执行的操作):
button.addTarget(self, action: #selector(nameOfYourFunction), for: .touchUpInside)