听说你R脚本中的数据丢了,图出不来!
有小伙伴问为什么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类库的谐音),所以我一直强调,也别扯什么语言了,谁的内裤多,谁就是超人,就喊谁当爹!
本文与《听说你画的图,线条不见了》真的是遥相呼应啊!