An example that shows how to produce a similar plot is shown below:
pro dj_forum_hojin_cho_curveplot
compile_opt idl2
x = [10,25,33,61,65]
y = [-85,-82,-81,-86,-83]
z = [10, 20, 30, 40, 50]
xgrid = findgen(10)*8
ygrid = findgen(10)-90
data= griddata(x, y, z, /grid, /sphere, /degrees, XOUT=xgrid, YOUT=ygrid)
mpol = map('PolarStereographic', $
limit=[-90,0,-81,70])
c = contour(data, xgrid, ygrid, /fill, overplot=mpol, grid_units='degrees')
cb = colorbar(TARGET=c, position=[.1,.1,.4,.14])
end
|