[gradsusr] Panel plot

Zilore Mumba zmumba at gmail.com
Tue Jan 7 17:05:44 EST 2025


Hello, I hope Grads help is still available and that I can reach someone. I
am trying to plot 2 graphics on a page. Is there a way of making the image
bigger. I have tried tacking set parea and xXXX, Yyyy in printim, with no
effect. The image I get is attached.
*
'reinit'
rc = gsfallow("on")
nrows=2
ncols=1
args=nrows%' '%ncols
'open /home/zmumba/DA/Dekad_Progs/Programs/stnId2Grads.ctl'
'open /home/zmumba/DA/Dekad_Progs/Programs/dist2Grads.ctl'
*'set mproj scaled'
panels(args)
*p is the panel number, p=1 means the first panel
p = 1
*ptot indicate the total numbers of panels (or virtual pages)
ptot = nrows * ncols
*here is the loop, draw panel one by one
*    'set parea 0.5 6 0.5 4.0'
    'set lat -31.0 -28.5'
    'set lon 26.5 30'
    'set display color white'
    'c'
    'set grid off'
    'set xlab off'
    'set ylab off'
    'set frame off'
    'set mpdset lowres'
    'set stid on'
    'set vpage 0 10 0 7.25'
while (p <= ptot)
*_vpg.p seting the virtual page, NO.p
    _vpg.p
    'set grads off'
    'd rval.'p
    if(p = 1)
     'Draw title AWS locations'
    endif
    if(p = 2)
     'Draw title District locations'
    endif
    'set line 8 1 6'
    'draw shp
/home/zmumba/DA/Dekad_Progs/Shapefiles/Lesotho/geoBoundaries-LSO-ADM1-all/geoBoundaries-LSO-ADM1.shp'
    p = p + 1
endwhile
  'set vpage off'
'printim /home/zmumba/DA/Dekad_Progs/Programs/somepic.png png white x1200
y900'
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://gradsusr.org/pipermail/gradsusr/attachments/20250108/46758433/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: somepic.png
Type: image/png
Size: 125426 bytes
Desc: not available
URL: <http://gradsusr.org/pipermail/gradsusr/attachments/20250108/46758433/attachment-0001.png>


More information about the gradsusr mailing list