R Barchar在For循环中不起作用

我正在使用

barchart

进行多年的For循环，

barchart

命令在循环外部是正常的，但在内部-出现了一些问题

这是我的密码：

这是我的数据

---

谢谢

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

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) }

现在，您可以使用将其保存为PNG（或其他图像类型）

---

你认为这里会发生什么？AFAIK每次循环迭代都将覆盖上一个绘图。如果要保存每个绘图的副本，请查看

dev.copy

hi-Tim，解决方案：需要在print（）命令中激活条形图，我正在使用一组图表制作小动画。：）

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

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, 'myPlots.png')
dev.off()