私は、それぞれが別々のpdfファイルにある複数のプロットを生成する次のコードを持っています
myplot <-function(ind,dfList) {
dat <- dfList[[ind]]
detects <- as.numeric(dat$Result2[dat$cens== 0])
pdf(file=paste("Desktop/qqplot_",ind,".pdf",sep = ""))
qqnorm(log(detects), ylab="Ln of uncensored data in ppm", main="Q-Q plot", pch=16)
qqline(log(detects))
dev.off()
}
Plots <- lapply(1:3, myplot , dfList = mydata)
質問1:このコードは3つのpdfファイルを生成します。ファイルのラベルは1、2、および3です。各ファイルをプロットX、プロットY、プロットZとして再ラベル付けするコードを挿入するにはどうすればよいですか。
質問2:myplot関数では、プロットのタイトルはQQプロットですが、ファイルの名前に対応するタイトルを変更したいと思います。したがって、各プロットタイトルは、プロットX、プロットY、プロットZである必要があります。