假设我有两个源文件,第一个命名example1.r,第二个example2.r(下面给出).
example1.r
plot(1:10,1:10)
Run Code Online (Sandbox Code Playgroud)
example2.r
qplot(1:10,1:10)
Run Code Online (Sandbox Code Playgroud)
当我获取example1.r时,绘制图形.但是,当我获取example2.r时,它不会.这里有什么解决方案?
我有一个功能,可以根据条件执行操作然后绘制:
f <- function(n) {
rand <- rnorm(n)
no <- seq_len(n)
df <- data.frame(no=no, rand=rand)
if (n > 10) {
png("plot.png")
p <- ggplot(df)
p + geom_point(aes(x=no, y=rand))
dev.off()
}
}
f(11)
Run Code Online (Sandbox Code Playgroud)
我在这结尾处得到一个空白的png文件.这里发生了什么?