在循环中画图,用 pdf("a.pdf") ggplot() dev.off() 跑完之后,我总是会遇到文件已损坏的情况。解决方法: pdf("a.pdf") p <- ggplot() plot(p) dev.off()