[ncl-talk] gsn_add_txt in panel plot

Adam Phillips asphilli at ucar.edu
Tue Nov 30 15:07:08 MST 2021


Hi Debasish,
Make sure you are naming the return variables different names for each call
to gsn_add_text. You stopped showing your gsn_add_text calls after the
first set, but the second set should be:
dum4=gsn_add_text(wks,plot_A(0),strs(2),-38,50,txres)
dum5=gsn_add_text(wks,plot_A(0),strs(3),-36,40,txres)
res at gsnCenterString   = labes(1)
plot_A(1) = gsn_csm_contour_map_ce (wks, msd2(:,:), res)
dum6 = ...
dum7 = ...

alternatively, set up a 2D array to hold everything:
dum = new((/12,5/),graphic)
plot_A(0) = gsn_csm_contour_map_ce (wks, msd1(:,:), res)
dum(0,0)=gsn_add_polymarker(wks,plot_A(0),lond,latd,mkres)
dum(0,1)=gsn_add_text(wks,plot_A(0),strs(0),-28,23,txres)
dum(0,2)=gsn_add_text(wks,plot_A(0),strs(1),-23,27,txres)
dum(0,3)=gsn_add_text(wks,plot_A(0),strs(2),-38,50,txres)
dum(0,4)=gsn_add_text(wks,plot_A(0),strs(3),-36,40,txres)
res at gsnCenterString   = labes(1)
plot_A(1) = gsn_csm_contour_map_ce (wks, msd2(:,:), res)
dum(1,0)= ...
dum(1,1)= ...
...

Hope that helps!
Adam



On Tue, Nov 30, 2021 at 11:28 AM Debasish Hazra via ncl-talk <
ncl-talk at mailman.ucar.edu> wrote:

> I am trying to add gsn_add_txt and polymarks in panel plot of 12 figures
> with 1st figure will show locations and index of stations but in the final
> figure I am getting the circles but not texts in the figure itself.
> Following is part of the code where I am setting up my ncl code to add
> polyres and txts. Any help on this would be appreciated.
>
> res      = True               ; plot options desired
>   res at gsnAddCyclic = False
>   res at gsnMajorLatSpacing = 10             ; change maj lat tm spacing
>   res at gsnMajorLonSpacing = 20
> SNIP........
> mkres = True
>     mkres at gsMarkerIndex = 17     ; Filled circle
>     mkres at gsMarkerSizeF = 0.02
>
>      latd = (/24.7,26.73, 49.09,38.43/)
>     lond = (/-26.95,-22.93,-38.02, -36.24/)
>
>          polyres               = True          ; poly marker mods desired
>      polyres at gsMarkerIndex = 17            ; choose circle as polymarker
>      polyres at gsMarkerSizeF = 0.01           ; select size to avoid
> streaking
>      polyres at gsMarkerColor = (/"red"/)   ; choose color
>
>         txres = True
>         txres at txFont        = 19           ; Change the default font.
>         txres at txFontHeightF = 0.008         ; Set the font height.
>         txres at txJust        = "TopLeft"
>         txres at txFontColor   = "Black"
> ;;         txres at txFont = "helvetica-bold"
>        txres at txFuncCode    = "~"
>            strs = (/"1","2","3","4"/)
>
>           res at gsnCenterString   = labes(0)
>         plot_A(0) = gsn_csm_contour_map_ce (wks, msd1(:,:), res)
>         dum1=gsn_add_polymarker(wks,plot_A(0),lond,latd,mkres)
>         dum2=gsn_add_text(wks,plot_A(0),strs(0),-28,23,txres)
>         dum3=gsn_add_text(wks,plot_A(0),strs(1),-23,27,txres)
>         dum4=gsn_add_text(wks,plot_A(0),strs(2),-38,50,txres)
>         dum5=gsn_add_text(wks,plot_A(0),strs(3),-36,40,txres)
>         res at gsnCenterString   = labes(1)
>         plot_A(1) = gsn_csm_contour_map_ce (wks, msd2(:,:), res)
> SNIP.......
>  gsn_panel(wks,plot_A,(/3,4/),pres1)
>
> ;        draw(plot_A)
>         frame(wks)
>
> Thanks
> Debasish
>
> _______________________________________________
> ncl-talk mailing list
> ncl-talk at mailman.ucar.edu
> List instructions, subscriber options, unsubscribe:
> https://mailman.ucar.edu/mailman/listinfo/ncl-talk



-- 
Adam Phillips
Associate Scientist,  Climate and Global Dynamics Laboratory, NCAR
www.cgd.ucar.edu/staff/asphilli/   303-497-1726

<http://www.cgd.ucar.edu/staff/asphilli>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.ucar.edu/pipermail/ncl-talk/attachments/20211130/09af007f/attachment.html>


More information about the ncl-talk mailing list