请考虑以下示例:
require(ggplot2)
aa <- data.frame(date = runif(3,1,100),Change = runif(3,1,100))
bb <- data.frame(date = runif(3,1,100),Change = runif(3,1,100))
dd <- rbind(aa,bb)
dd$site <- c("aa","aa","aa","bb","bb","bb")是否有可能在同一文档中生成两个数字,其中图1应该是与站点== 'aa‘对应的站点,而第二个数字应该是与站点== 'bb’对应的站点?
我曾尝试在一个循环中生成数字,但在pdf中似乎没有绘制任何数字:
nams <- ("aa","bb")
pdf("plots.pdf",width = 6,height = 6, paper='A4',family = "Times")
for (i in 1:2){
dd2 <- dd[dd$site == nams[i],]
ggplot(dd,aes(date,Change)) +
geom_line()
}
dev.off()发布于 2015-01-13 13:30:08
您必须在绘图中使用print来输出它:
for (i in 1:2){
dd2 <- dd[dd$site == nams[i],]
print(ggplot(dd, aes(date, Change)) +
geom_line()
)
}https://stackoverflow.com/questions/27923188
复制相似问题