运行 作为脚本时 ggplot 没有输出

No output from ggplot when running as a script

很抱歉打扰你,这肯定是一个非常简单的错误,但我仍然无法自己解决:

library(ggplot2)

X = rep(c(1:6),3)
Y = rep(c(1:6),3)
group = rep(c(1:3), each = 6)

data = data.frame(X = X, Y = Y, group = group)

ggplot(data, aes(x = X, y = Y, group = group)) + geom_point() 

当我 运行 作为脚本时,我没有从中得到任何输出——没有创建图形。我在这里做错了什么?

如果您从另一个函数或在 Shiny 中调用它,请尝试打印该图:

myplot <- ggplot(data, aes(x = X, y = Y, group = group)) + geom_point() 

print(myplot)