让foreach()和ggplot2相处融洽

时间:2009-08-30 02:07:13

标签: r foreach ggplot2

我有一组调查数据,我想生成一个特定变量的图,按受访者的国家分组。到目前为止我编写的用于生成图的代码是:

countries <- isplit(drones, drones$v3)
foreach(country = countries) %dopar% {
  png(file = paste(output.exp, "/Histogram of Job Satisfaction in ", country$key[[1]], ".png", sep = ""))
  country.df <- data.frame(country)  #ggplot2 doesn't appreciate the lists nextElem() produces
  ggplot(country.df, aes(x = value.v51)) + geom_histogram()
  dev.off()
}

真正离奇的事情是什么?我可以运行isplit(),设置country <- nextElem(countries),然后运行代码而不发送foreach行 - 并得到一个可爱的情节。如果我发送foreach,我会得到一些空白的.png文件。

提前感谢您的帮助。

我绝对可以使用标准R循环来做到这一点,但我真的希望更好地掌握foreach

1 个答案:

答案 0 :(得分:10)

如果要显示该图,则需要print

print(ggplot(country.df, aes(x = value.v51)) + geom_histogram())

默认情况下,ggplot命令返回一个绘图对象,但命令本身并不实际显示该绘图;这是用print命令完成的。请注意,当您以交互方式运行代码时,将打印命令结果,这就是您通常不需要显式打印的原因。但是当包裹在foreach中时,您需要明确打印,因为正文中的命令结果将不会被回显。