用grads怎样将两张图画到一张图上

yyyy

萍水啸天 发表于 2013-5-12 11:35

                               
登录/注册后可看大图

朱禾有一本新书是关于在一页最多画6张图的，你可以去看看，好像涉及一个模板问题

好的，谢谢你，我找一下你说的书好好地研究一下，谢啦

mofangbao

你多写了一个print，这个不是grads的bug哈，是你自己粗心或者说没理解对。
把第一个print去掉，留最后一个就行了

yyyy

mofangbao 发表于 2013-5-12 16:34

                               
登录/注册后可看大图

你多写了一个print，这个不是grads的bug哈，是你自己粗心或者说没理解对。
把第一个print去掉，留最后一个 ...

试过了，不行，如果我把第一个print去掉的话，就只画第二张图。。。。

mofangbao

请在论坛搜索一页多图，你两张图是要设置两次vpage的

yyyy

mofangbao 发表于 2013-5-13 00:06

                               
登录/注册后可看大图

请在论坛搜索一页多图，你两张图是要设置两次vpage的

我一开始是设置了两次的，但画到了两张图上，后来有人建议我把第二个去掉，我就试了试，还是没效果。。。。。

mofangbao

yyyy 发表于 2013-5-13 08:24

                               
登录/注册后可看大图

我一开始是设置了两次的，但画到了两张图上，后来有人建议我把第二个去掉，我就试了试，还是没效果。。。 ...

因为你一开始写了两个print，当然是两张图。
请设置两次vpage和parea，每一个实际上都是一个11*8.5的页面，这也是被称为虚页的原因，多思考吧。我看你回复了一页多图的帖子，请看懂一页多图的原理，你就能自己设置vpage来实现了，不要别人说什么你就做什么，还是得思考一下为什么的

yyyy

mofangbao 发表于 2013-5-13 14:44

                               
登录/注册后可看大图

因为你一开始写了两个print，当然是两张图。
请设置两次vpage和parea，每一个实际上都是一个11*8.5的页面 ...

我不知道增么说了，举个例子吧
下面是成功地：
gs：
'reinit'

'open e:\paper\three\tx\tx9\st6.ctl'
'set x 1'
'set y 1'
'set z 1'
'set t 1 65'
'define y6=st6'
'close 1'

'open e:\paper\three\tx\tx9\st12.ctl'
'set x 1'
'set y 1'
'set z 1'
'set t 1 65'
'define y12=st12'
'close 1'

'open e:\paper\three\tx\tx9\10rain.ctl'
'enable print e:\paper\three\tx\tx9\10-rs-15yr.gmf'
'set x 1'
'set y 1 10'
'set z 1'
'set t 8 58'


'set vpage 0 11 0 8.5'
'set parea 0.5 5.3 4.0 8.0'
'define A=tcorr(y6,r,t-7,t+7)'
'set xyrev on'
'set grads off'
'set csmooth on'
'd A'
'draw string 0.5 7.8 JJA'
'draw string 2.5 3.5 (a)'
*'draw title rain-sst 15yr 678'
'print'

'set vpage 0 11 0 8.5'
'set parea 5.8 10.6 4.0 8.0'
'define G=tcorr(y12,r,t-7,t+7)'
'set xyrev on'
'set grads off'
'set csmooth on'
'd G'
'draw string 5.8 7.8 DJF'
'draw string 8.0 3.5 (b)'
*'draw title rain-sst 15yr 12-1-2'
'print'

'reinit'


这是不成功的：
gs:
'reinit'

'open E:\paper\eight\10rain.ctl'
'set x 1'
'set z 1'
'set t 1 65'
'set y 4'
'define r4=rain'
'set y 5'
'define r5=rain'
'define yu=(r4+r5)/2.0'
'close 1'

'open e:\paper\eight\pajp.ctl'
'set z 1'
'set lon 73 135'
'set lat 18.75 53.75'
'set t 1 65'
'define rr=r'
'close 1'

'open E:\paper\eight\st6.ctl'
'set x 1'
'set y 1'
'set z 1'
'set t 1 65'
'define s=st6'
'close 1'

'open E:\paper\eight\sst.ctl'
'enable print e:\paper\eight\prs.gmf'
'set z 1'
'set lon 0 360'
'set lat -88 88'
'set t 1 65'
'define ss=sst'


'set lon 0 360'
'set lat -88 88'
'set t 1 65'
'set vpage 0 11 0 8.5'
'set parea 0.50 6.50 4.00 8.20'
'set grads off'
'define R=tcorr(yu,ss,t=49,t=58)'
'd R'


'set lon 73 135'
'set lat 18.75 53.75'
'set t 1 65'
'set vpage 0 11 0 8.5'
'set parea 7.00 10.50 4.00 8.20'
'set mpdset hires'
'set grads off'
'set cint 0.1'
'define Q=tcorr(s,rr,t=49,t=58)'
'd Q'
*'draw title rain-sst'
'print'

'reinit'

yyyy

mofangbao 发表于 2013-5-13 14:44

                               
登录/注册后可看大图

因为你一开始写了两个print，当然是两张图。
请设置两次vpage和parea，每一个实际上都是一个11*8.5的页面 ...

不好意思，浪费了你很多时间，谢谢你每次回帖，我会好好弄明白的

蔚蓝的天

论坛搜索一页多图

ぁ哎哟ぞ

yyyy 发表于 2013-5-12 16:30

                               
登录/注册后可看大图

好的，谢谢你，我会努力的，再问一下，你提到的“气象出版社的grads书”的名字能告诉我一下吗？谢谢

马红云 李丽萍写的那本grads书的中后部分有简单的设置虚页 的例子      翻一下书