一页多图

南信大马琼

请问我将10年的数据放到一个grd文件，一年只有一个数据，然后想通过一页多图的方式显示十年的图片，gs里面时间循环应该怎么做呢，谢谢大家的帮助。。。附件是我根据版主的例子改的，里面只有一个变量，就是10年的平均值

1. 
   
2. 'reinit'
   
3. rc=gsfallow("on")
   
4. nrows=2
   
5. ncols=2
   
6. args=nrows%' '%ncols
   
7. 'open D:\d\mo.ctl'
   
8. 'set mproj scaled'
   
9. panels(args)
   
10. p=1
    
11. ptop=nrows*ncols
    
12. while(p<=ptop)
    
13. _vpg.p
    
14. 'set mpdset cn'
    
15. 'set parea 1.0 9.8 1 7.5'
    
16. 'set t p'
    
17. 'set grads off'
    
18. 'set gxout shaded'
    
19. 'set font 2'
    
20. 'set xlopts 0 7 0.12'
    
21. 'set ylopts 0 7 0.12'
    
22. 'd n'
    
23. 'set font 0'
    
24. 'cbar_interp 1 1 1'
    
25. 'zb 30 30 0.1'
    
26. 'set font 5'
    
27. 'set clab forced'
    
28. 'set gxout contour'
    
29. 'set ccolor rainbow'
    
30. 'set clskip 15'
    
31. 'set cstyle 1 '
    
32. 'set strsiz 0.3 0.3'
    
33. 'd ave(n,t=1,t=12)'
    
34. 'draw title 'The Distribution of dust aerosol concentration in China''
    
35. p=p+1
    
36. endwhile
    
37. 'set vpage off'
    
38. 'cbarn'
    
39. 'print'
    
40. 'printim D:\d\data\1995.png white '
    
41. 'reinit'
    
42. 
    

<br /> 'reinit'<br /> rc=gsfallow("on")<br /> nrows=2<br /> ncols=2<br /> args=nrows%' '%ncols<br /> 'open D:\d\mo.ctl'<br /> 'set mproj scaled'<br /> panels(args)<br /> p=1<br /> ptop=nrows*ncols<br /> while(p<=ptop)<br /> _vpg.p<br /> 'set mpdset cn' <br /> 'set parea 1.0 9.8 1 7.5'<br /> 'set t p'<br /> 'set grads off'<br /> 'set gxout shaded'<br /> 'set font 2'<br /> 'set xlopts 0 7 0.12'<br /> 'set ylopts 0 7 0.12'<br /> 'd n'<br /> 'set font 0'<br /> 'cbar_interp 1 1 1'<br /> 'zb 30 30 0.1'<br /> 'set font 5'<br /> 'set clab forced'<br /> 'set gxout contour'<br /> 'set ccolor rainbow'<br /> 'set clskip 15'<br /> 'set cstyle 1 '<br /> 'set strsiz 0.3 0.3'<br /> 'd ave(n,t=1,t=12)'<br /> 'draw title 'The Distribution of dust aerosol concentration in China''<br /> p=p+1<br /> endwhile<br /> 'set vpage off'<br /> 'cbarn'<br /> 'print'<br /> 'printim D:\d\data\1995.png white ' <br /> 'reinit'<br /> <br />

mofangbao

你到底是哪里遇到问题了？现在做到哪一步？接下来要做什么？

蓝冰草

有个人，走了再也没回来~~~

hugeal10000

好东西，谢谢楼主了！