有小伙伴问为什么R里循环出不来图?

其实看我公众号的各位读者们,你们不应该有这个问题,如果有,那么证明我的文章没有好好看!有两篇很重要的文章《扪心自问,meme几何?》和《树变图,图变树? ?》,特别是第二篇,和这个问题息息相关。

首先假设我们有一个图:

require(ggplot2)
p = qplot(1:10)

为什么在终端打p可以出图?

因为在R里,所有都是对象,而在终端里你输入一个对象回车,R会去找相应的方法去打印出来,如果是S3对象,会去寻找print方法,而如果是S4会去找show方法。

所以你在终端里打p,其实等同于你打print(p),它其实调用了ggplot2:::print.ggplot,

你打plot(p)也可以,如果你看过代码的话,画图这个动作是定义在plot.ggplot方法里的,而

print.ggplot <- plot.ggplot。

为什么在循环里就不行?

很多人认为这是ggplot2的问题,而且这也是一个FAQ了,我也遇到好多人问我,其实这不是ggplot2的问题,如果你认为是ggplot2的问题,你看到的只是皮毛。

我上面已经说了,是面向对象的问题,所以这是R里普遍的现象,而ggplot2之所以有这个问题,因为返回的不是图,而是对象。

假设你有一个变量x <- 5,你打x,它会显示5,而如果在循环里呢?

不信你试试以下两段循环:

for (i in 1:3) x
for (i in 1:3) print(x)

第一段啥都不显示,第二段显示了。在循环里你的x,啥都没干,扔了。

那么为什么呢?因为在循环里,R不会自做聪明地去打印任何东西,或者做其它任何的操作,除非你让它干。

为什么没有循环的脚本,在终端里跑可以,跑脚本却不行?

这是交互与否的问题,你如果是交互环境,R是面向用户,它自做聪明地要方便用户。而如果你不是在交互,那么你是开发者,你理应知道自己想干什么,所以说有这个问题的人,你们还只是用户的水平,不要以为写两句脚本就是码农。

你跑下面的代码,返回的是FALSE:

Rscript -e ‘interactive()’ 而你在R终端里跑interactive,返回的是TRUE。

一点提醒

~/.Rprofile会影响你的R终端和R脚本,所以你额外的东西,放在了~/.Rprofile里,相当于在你的R脚本里预先跑了~/.Rprofile,而你的脚本拿到别人的机器上跑,别人可能没有~/.Rprofile,或者有却与你的不同,于是你的脚本挂了,因为运行环境不一致。所以在定义~/.Rprofile的时候,要小心。你最好能够加一个判断语句,知道自己是在终端还是脚本,如果是脚本不加载,终端才加载。于是你用终端的时候方便,你写脚本的时候不影响,起码保证你在自己机器上跑的脚本和在别人机器上跑的是一样的。如果你懂这些,再说自己是用python还是R吧。许多人声称在用某种语言做开发,其实只是用户,在用别人开发好的包,在穿别人做好的内裤(取java类库的谐音),所以我一直强调,也别扯什么语言了,谁的内裤多,谁就是超人,就喊谁当爹!

本文与《听说你画的图,线条不见了》真的是遥相呼应啊!