[ncl-talk] Too much white space between rows in WRF panelplot
Tabish Ansari
tabishumaransari at gmail.com
Tue Apr 14 11:39:00 MDT 2020
Hi
I'm paneling eight wrf contour maps into 2 rows and 4 columns, and using
gsnPanelYWhiteSpacePercent = 0. Still, there's a lot of white space between
the two rows which I need to remove. Please see the attached plot.
Here's the relevant part of my script:
* b =
addfile("/rasher/tabish/control-run-so4-ECMWF/wrfout_d03_2014-10-24_010000.nc
<http://wrfout_d03_2014-10-24_010000.nc>","r") ; Open a file wks
= gsn_open_wks("pdf","episode-maps") ; Create a plot workstation
gsn_define_colormap(wks,"WhiteBlueGreenYellowRed") opts = True
; Set some Basic Plot options opts at InitTime = False
; Do not plot time or footers opts at Footer = False
res = opts ; Use basic options for this
field res at cnFillOn = True ; Create a color fill
plot res at cnLevelSelectionMode = "ManualLevels" ; set levels manually
res at ContourParameters = (/ 25, 325, 25 /) ; Set the levels res at gsnFrame
= False ; don't advance frame yet res at gsnDraw
= False ; don't draw plot res at lbLabelBarOn = False
res at tiMainOn = False res at tiXAxisOn = False contour_BASELINE_24 =
wrf_contour(a0_24,wks,BASELINE_24,res) contour_A_24 =
wrf_contour(a0_24,wks,A_24,res) contour_B_24 =
wrf_contour(a0_24,wks,B_24,res) contour_C_24 =
wrf_contour(a0_24,wks,C_24,res) contour_BASELINE_30 =
wrf_contour(a0_30,wks,BASELINE_30,res) contour_A_30 =
wrf_contour(a0_30,wks,A_30,res) contour_B_30 =
wrf_contour(a0_30,wks,B_30,res) contour_C_30 =
wrf_contour(a0_30,wks,C_30,res) pltres = True
; Set plot options pltres at NoTitles = False pltres at CommonTitle =
False pltres at NoHeaderFooter = True pltres at PanelPlot = True mpres = True
; Set map options
mpres at mpOutlineBoundarySets = "AllBoundaries" ; turn on country
boundaries mpres at mpGeophysicalLineColor = "Black" ; color of
cont. outlines mpres at mpNationalLineColor = "Black" ; color of
cont. outlines mpres at mpProvincialLineColor = "Black" ; color of
cont. outlines mpres at mpGeophysicalLineThicknessF = 1.5 ;
thickness of outlines mpres at mpNationalLineThicknessF = 1.5 ;
thickness of outlines mpres at mpProvincialLineThicknessF = 1.5 ;
thickness of outlines mpres at mpDataBaseVersion = "MediumRes" ;
choose higher resolution mpres at mpDataSetName = "Earth..4"
; choose most recent boundaries*
*; MAKE PLOTS mpres at tmXTOn = True mpres at tmYROn = True
mpres at tmXBMajorOutwardLengthF = 0.0 ; draw tickmarks inward
mpres at tmXBMinorOutwardLengthF = 0.0 ; draw minor ticks
inward mpres at tmYLMajorOutwardLengthF = 0.0 ; draw tickmarks
inward mpres at tmYLMinorOutwardLengthF = 0.0 ; draw minor
ticks inward mpres at tmXTMajorOutwardLengthF = 0.0 ; draw
tickmarks inward mpres at tmXTMinorOutwardLengthF = 0.0 ; draw
minor ticks inward mpres at tmYRMajorOutwardLengthF = 0.0 ;
draw tickmarks inward mpres at tmYRMinorOutwardLengthF = 0.0 ;
draw minor ticks inward mpres at tmXBLabelFontHeightF = 0.018
mpres at tmXTLabelFontHeightF = 0.018 mpres at tmYRLabelFontHeightF = 0.018
mpres at tmYLLabelFontHeightF = 0.018 plot1 =
wrf_map_overlays(b,wks,(/contour_BASELINE_24/),pltres,mpres) ; Plot field
over map background plot2 =
wrf_map_overlays(b,wks,(/contour_A_24/),pltres,mpres) ; Plot field over map
background plot3 = wrf_map_overlays(b,wks,(/contour_B_24/),pltres,mpres) ;
Plot field over map background plot4 =
wrf_map_overlays(b,wks,(/contour_C_24/),pltres,mpres) ; Plot field over map
background plot5 =
wrf_map_overlays(b,wks,(/contour_BASELINE_30/),pltres,mpres) ; Plot field
over map background plot6 =
wrf_map_overlays(b,wks,(/contour_A_30/),pltres,mpres) ; Plot field over map
background plot7 = wrf_map_overlays(b,wks,(/contour_B_30/),pltres,mpres) ;
Plot field over map background plot8 =
wrf_map_overlays(b,wks,(/contour_C_30/),pltres,mpres) ; Plot field over map
background ; Panel the WRF plots. pnlres =
True pnlres at gsnPanelXWhiteSpacePercent = 5 ; Add white space b/w
plots. pnlres at gsnPanelYWhiteSpacePercent = 0 ; Add white space b/w
plots. pnlres at gsnPanelLabelBar = True ; Turn on common
labelbar pnlres at lbBoxMinorExtentF = 0.2
pnlres at pmLabelBarOrthogonalPosF = 0.1 pnlres at gsnFrame = False
gsn_panel(wks,(/plot1,plot2,plot3,plot4,plot5,plot6,plot7,plot8/),(/2,4/),pnlres);
Draw a text string at the bottom txres = True
txres at txFontHeightF = 0.012 gsn_text_ndc(wks,"PM~B~2.5~N~ in
~F33~m~F21~gm~S~-3~N~",0.5,0.21,txres) frame(wks)*
Any help will be much appreciated.
*Tabish U Ansari*
*Postdoctoral Researcher *
*Centre for Climate and Air Pollution Studies (C-CAPS)*
*School of Physics, NUI-Galway**, Ireland*
*ResearchGate: https://www.researchgate.net/profile/Tabish_Ansari
<https://www.researchgate.net/profile/Tabish_Ansari>*
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.ucar.edu/pipermail/ncl-talk/attachments/20200414/14873df7/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: episode-maps.pdf
Type: application/pdf
Size: 631794 bytes
Desc: not available
URL: <http://mailman.ucar.edu/pipermail/ncl-talk/attachments/20200414/14873df7/attachment-0001.pdf>
More information about the ncl-talk
mailing list