Folks,
There is an ominous silence today from the new graphics
gurus to some of my questions. I suppose the Rockies
are playing a game that will get them into the World
Series or something.
But, I know how you folks love a challenge. So,
here you go. Can anyone figure out how to produce
the following figure with the new graphics in IDL 8:
http://www.dfanning.com/misc/testimage.png
I've put the image data here:
http://www.dfanning.com/misc/testimage.img
And here is the code I use to produce the figure
in the old graphics system:
;*************************************************
openr, 1, 'testimage.img'
image = bytarr(720,600)
readu, 1, image
close, 1
mapStruct = map_proj_init('Lambert Azimuthal', $
sphere_radius=6371228.00, $
center_lat=90.0, center_lon=0.0)
window, xsize=720, ysize=600
loadct, 0
tvlct, 255, 255, 255, 0
tv, image
plot, [0,1], xrange=[-1440000.0, 1440000.0], $
yrange=[-89421.780, 2310578.2], $
/nodata, xstyle=5, ystyle=5, $
position=[0,0,1,1], /noerase
map_continents, color=fsc_color('red'), $
map_structure=mapStruct, /hires
map_grid, color=fsc_color('cyan'), $
map_structure=mapStruct, thick=2, $
lats=[90, 85, 80, 75, 70, 65], /label
END
;*************************************************
The challenge is to produce this figure (or something
comparable) in the new graphics system.
As usual, a hug and a kiss for whoever gets it first.
Oh, wait! I've been a father too long. A beer or something
for whoever gets it first. :-)
Cheers,
David
--
David Fanning, Ph.D.
Fanning Software Consulting, Inc.
Coyote's Guide to IDL Programming: http://www.dfanning.com/
Sepore ma de ni thui. ("Perhaps thou speakest truth.")
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
