filein,'postage.fits'
freeze
!p.multi = [0,3,3]
for i=0,8 do begin & $
getrec,i & $
x = getxarray() & $
y = getdata() & $
plot,x,y,xstyle=1 & $
endfor
unfreeze
For more flexibility in plot placement, the position parameter can be used, as in the following procedure:
pro plotpos,x,y,xpos,ypos,xsize,ysize
if (n_elements(xsize)) eq 0 then xsize = 0.1
if (n_elements(ysize)) eq 0 then ysize = 0.1
freeze
plot,x,y,position=[xpos-xsize/2,ypos-ysize/2,xpos+xsize/2,ypos+ysize/2], $
/noerase, xstyle=1
unfreeze
end
The procedure might be used as follows:
erase getrec,0 plotpos, getxarray(), getdata(), 0.5, 0.5, 0.25, 0.25 getrec,1 plotpos, getxarray(), getdata(), 0.2, 0.5, 0.25, 0.25 getrec,2 plotpos, getxarray(), getdata(), 0.8, 0.5, 0.25, 0.25 getrec,3 plotpos, getxarray(), getdata(), 0.5, 0.2, 0.25, 0.25 getrec,4 plotpos, getxarray(), getdata(), 0.5, 0.8, 0.25, 0.25This process could be encapsulated into a single, flexible procedure. -- JimBraatz - 05 Aug 2005
| Topic GBTIDLPostageStampPlots . { Edit | Attach | Ref-By | Printable | Diffs | r1.1 | More } |
|
Revision r1.1 - 05 Aug 2005 - 20:24 GMT - JimBraatz Parents: IDLDocumentation > IDLDocumentationV1pt2 |
Content copyright © 1999-2007 by the contributing authors. All material on this collaboration platform is the property of the contributing authors. |