使用 R 创建用于数据分析的循环

Creating loops for data analyses with R

主题已过时,请删除

如果“I”是数字索引,例如 1,2,3...您可以使用 paste0for 这是一个与您发布的代码完全相同的示例

for (i in 1:X) {
  data1 <- read_csv(paste0("../",i,"_FILE.csv"))
  data2 <- read_excel(paste0("Nr",i,".xlsx"))
  
  #Merge
  a <- function(s) (trunc(chron(s),"00:36:00"))
  z1<- read.zoo(data1, header=TRUE, FUN=a, agg=mean)
  z2<- read.zoo(data2, header=TRUE, FUN=a, agg=mean)
  
  merged <- merge(z1,z2)
  
  png(paste0(i,".png/tiff/whatever"))
  print(plot(merged$z2,merged$z1,
       main=i))
  dev.off()
    write.csv(merged, file=paste0(i,".csv"),
              row.names = TRUE)
}

我不确定你的地块路径是否正确。 Myabe 比较好,比如 png(paste0("path/to/your/folder/",i,".png"))