;this is file 1dcolor_eg.idl if n_elements( ps) eq 0 then ps=0 restore, '2dcolor_eg.sav' ;;;, /ve img= brtimg ;CLIP WITH brtmin, brtmax and ADJUST IMAGE CONTRAST WITH gamma... gamma = 2.5 brtmin = 0.00 brtmax = 10. brtimg= (brtmin > (img < brtmax))^gamma if ps then ps_ch, '1dcolor_eg.ps', /defaults, /color, xs=6, ys=8 ;--------- POSITION THE WINDOWS YOURSELF IF YOU WANT ----------- ;if you want to specify the position within the plotting window yourself, ;take a look at img_char_posns.pro. You'd use its output imgposn for ;the position keyword in display, and you'd use its output cbarposn ;for the position keyword in colorbar. ;CREATE THE WINDOW WITH BORDERS... w_left=0.16 w_rght=0.05 w_bot=0.16 w_top=0.14 space=0.03 width=0.1 ;img_cbar_posns, w_left, w_rght, w_bot, w_top, space, width, $ ; imgposn, cbarposn, f_hor, f_ver aspect=541./470. ;------------- make the annotated image ---------------------- display, bytscl(brtimg), ra_axis, dec_axis, aspect=aspect, $ /xsty, xtit='RA, Hours', xra= reverse( minmax(ra_axis)), $ /ysty, ytit='Dec, Degrees';, position=imgposn ;;, color=plotcolor ;stop cbarposn = [!x.window[0],!y.window[1]+0.05,!x.window[1],!y.window[1]+0.05+0.10] colorbar, crange=[brtmin, brtmax], color=plotcolor, $ cgamma=gamma, xtit=textoidl('T \DeltaV'), $ yticks=2,yminor=1, pos=cbarposn ;;, ystyle=9 if ps then ps_ch, /close