2016-12-08 144 views
-1

我正在使用barchart in 对于循环,经历多年后,barchart命令在循环外部正常,但在内部 - 出现错误。R Barchar在For循环中不工作

这里是我的代码:

for(i in 2006:2016){ 
    htr2 = htr[htr$year==i , ] 
    barchart(year ~ y_kayam , groups=shlav, htr2, auto.key = list(columns = 2) ) 
    Sys.sleep(5) } 

这里是我的数据

year vaada shlav tm38 y_kayam y_mevukash 
2013 410   1 1  12.00 
2013 410   2 1  12.00 
2013 410   1 1  
2013 410   1 1  8.00 15.00 
2013 410   3 1  8.00 15.00 
2013 410   1   8.00 15.00 
2013 410   1 1  15.00 28.00 
2013 410  3 1  15.00 28.00 

谢谢!

+1

你期望在这里发生什么? AFAIK每个循环迭代将简单地覆盖前面的图。 –

+0

如果你想保存每个图的副本,看看'dev.copy' – clemlaflemme

+0

嗨蒂姆,解决方案:需要在print()命令中激活条形图,我使用一组图表制作小动画。 :) –

回答

0

为了很好地绘制六个图,我将使用par函数。

par(mfrow=c(3,3)) 

for(i in 2006:2016){ 
    htr2 = htr[htr$year==i , ] 
    barchart(year ~ y_kayam , groups=shlav, htr2, auto.key = list(columns = 2) ) 
    Sys.sleep(5) } 

现在,您可以使用dev.copy()将其保存为PNG(或其他图像类型)。

dev.copy(png, 'myPlots.png') 
dev.off()