我試圖在這個向量中保存不同的圖,但它在所有情況下都為我保存了最后一次迭代。奇怪的是,標題應該改變。謝謝!
pl1=vector("list",5)
for (i in 1:5) {
pl1[[i]]=ggplot() geom_point(aes(x=c(1:96),y=G1[[i]]),color="blue")
scale_x_continuous(breaks =seq(0, 24, 3),expand = c(0,0))
scale_y_continuous(breaks =seq(1, 8, 0.8))
labs(title=ubi[i,3],x="Dias(hs)",y= "Pp(mm/hs)")
theme_bw() theme(panel.grid = element_line(color="white"))
}
uj5u.com熱心網友回復:
您可以使用local
和print
。
for (i in 1:5) {
pl1[[i]] <- local({
i <- i
p1 <- ggplot() geom_point(aes(x=c(1:96),y=G1[[i]]),color="blue")
scale_x_continuous(breaks =seq(0, 24, 3),expand = c(0,0))
scale_y_continuous(breaks =seq(1, 8, 0.8))
labs(title=ubi[i,3],x="Dias(hs)",y= "Pp(mm/hs)")
theme_bw() theme(panel.grid = element_line(color="white"))
print(p1)})
}
轉載請註明出處,本文鏈接:https://www.uj5u.com/yidong/491059.html