【求助】xyplot作图时，如何使用for循环

yzhlinscau

各位大虾，我是个R初学者，最近在用R做图，发现xyplot作图时，单一画图可以画出来，但加上for循环时，却画不出图，这是什么原因呢？哪位大虾能否给与指点一下，谢谢！


数据（'fam-h-plot_2.csv）格式如下：

Fam1        Fam        Spacing        ca        rank
1        Fam_70001        S3        1        18
1        Fam_70001        S2        1        14
1        Fam_70001        S3        2        38
1        Fam_70001        S2        2        46
1        Fam_70001        S3        3        34
1        Fam_70001        S2        3        49
1        Fam_70001        S3        4        27
1        Fam_70001        S2        4        47
1        Fam_70001        S3        5        29
1        Fam_70001        S2        5        54
2        Fam_70002        S3        1        26
2        Fam_70002        S2        1        8
2        Fam_70002        S3        2        22
2        Fam_70002        S2        2        12
……

1. 
   
2. 
   
3. library(lattice)
   
4. plot.data<-read.table(file='fam-h-plot_2.csv',header=T,sep=',')
   
5. 
   
6. 
   
7. ####单一运行下述代码，可以做出图
   
8. plot3.data<-subset(plot.data, Fam1==1)
   
9. heading = paste("Fam=Fam_",1)
   
10. xyplot(rank~ ca, data=plot3.data, groups=Spacing, main=heading,type="o")
    
11. 
    
12. ######### for循环却做不出
    
13. 
    
14. for(i in 1:5 ){
    
15.   plot3.data<-subset(plot.data, Fam1==i)
    
16.   heading = paste("Fam=Fam_",i)
    
17.   xyplot(rank~ ca, data=plot3.data, groups=Spacing, main=heading,type="o")  
    
18. }

复制代码

奥利奥

你的i没有控制条件

yzhlinscau

楼上的，能否说详细些？谢谢！但是如果我用的是plot，而非xyplot，for循环却可以，只是得到的图非我所要。这中间的区别在哪？

1. for(i in 1:5 ){
   
2.   plot3.data<-subset(plot.data, Fam1==i)
   
3.   heading = paste("Fam=Fam_",i)
   
4.   plot(rank~ ca, data=plot3.data, groups=Spacing, main=heading,type="o")  
   
5. }

复制代码