Question

我正在运行一个R脚本来为几个监测井中的数据创建相关性分析。因此，我为一列的每个井创建了一个循环。在R studio中，我可以查看和导出图表。

我想创建一个自动保存的解决方案。我希望你能帮助我。谢谢！

在最后一行，我写下了保存文件的命令，但我必须为它创建一个循环。有关如何使用数据为其创建循环的任何想法吗？

function

Answer 1

您必须将png放入循环中并使用paste0创建文件名。我已经重新编写了代码以使其可重现。

df <-matrix(runif(80),ncol=8)
colnames(df) <-letters[1:8]
for (i in 2:8){
titel<-paste("Trend analysis of", colnames(df)[i])
png(filename = paste0("c:/temp/test",i,".png"),width=861,height=553,units="px",pointsize=8)
plot(df[,i],ylab="Ammonia [mg/l]",main=titel,col.main="darkblue",pch=20,col="darkblue")
dev.off()
}

Answer 2

非常感谢您的帮助！我已将命令集成到我的循环中，如：

df<-matrix(runif(80),ncol=8)
colnames(df)<-letters[2:8]

for (i in 2:8){
  monitoring_well<-NH3[,i]
  titel<-paste("Trend analysis of", colnames(df)[,i])
  png(filename = paste0("//Fileserver/ocm-data/13/039_Cork CC/07_ Derryconnell/laboratory data/Trendanalysis_R/test",i,".png"),width=861,height=553,units="px",pointsize=8)
  plot(Date,df[,i],ylab="Ammonia [mg/l]",main=titel,col.main="darkblue",pch=20,col="darkblue")
}

但不幸的是，错误＆＃34; xy.coords中的错误（x，y，xlabel，ylabel，log）：＆＃39; x＆＃39;并且＆＃39; y＆＃39;长度不同＆＃34;发生。我尝试了不同的选择，但我不知道问题出在哪里。

R：用于在另一个循环中保存绘图的循环

2 个答案: