<div dir="ltr"><div>Thank you Mary for the solving the issue. I am thankful and grateful</div><div><br></div><div>Best Regards</div><div>Ipshita</div></div><div class="gmail_extra"><br><div class="gmail_quote">On Fri, Mar 17, 2017 at 7:07 AM, Mary Haley <span dir="ltr"><<a href="mailto:haley@ucar.edu" target="_blank">haley@ucar.edu</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div class="gmail_default" style="font-size:small">Hi Ipshita,</div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px">The "conform" function doesn't do the masking. It simply propagates a 2D array to a 3D array. </span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px">You need to take this 2D mask array, conform it to 3D, and then apply it to your original "ts" data in order to "mask" the locations in "ts" where the values are 1:</span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default" style="font-size:small"><div style="font-size:12.8px"><font face="monospace, monospace">;---Create a 2D mask array using India shapefile outlines</font></div><div style="font-size:12.8px"><font face="monospace, monospace"><span style="font-size:12.8px"> ts_mask_2d = mask_data_with_India_country(</span><span style="font-size:12.8px">I<wbr>ndia_code,ts(0,:,:))<br></span><br></font></div><div style="font-size:12.8px"><span style="font-size:12.8px"><font face="monospace, monospace">;---Conform this 2D array to a 3D array</font></span></div><div style="font-size:12.8px"><font face="monospace, monospace"> ts_mask_3d = conform(ts,ts_mask_2d,(/1,2/))</font></div><div style="font-size:12.8px"><font face="monospace, monospace"><br></font></div><div style="font-size:12.8px"><div style="font-size:12.8px"><font face="monospace, monospace">;---Apply the 3D mask to "ts"</font></div><div style="font-size:12.8px"><font face="monospace, monospace"> tm_3d = mask(ts,ts_mask_3d,1) ; Keep ts when ts_mask_3d equal 1 </font></div><div style="font-size:12.8px"><font face="monospace, monospace"> </font></div><div><br></div></div></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px">The tm_3d array should now be the one that you can average.</span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px">By the way, there are some things you can do to clean up your code a little.</span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px">[1] You don't need to use a "do" loop to calculate the average. You can use "dim_avg_n" or "dim_avg_n_Wrap" (preserves metadata):</span></div><div class="gmail_default" style="font-size:small"><span style="font-size:12.8px"><br></span></div><div class="gmail_default"><div class="gmail_default"><span style="font-size:12.8px">prec_avg = dim_avg_n_Wrap(tm_3d,(/1,2/))</span></div><div class="gmail_default"><span style="font-size:12.8px"><br></span></div><div class="gmail_default">[2] You generally don't ever need to use "new" unless you need to populate that array inside a do loop by indexing it, or you just need to create an empty array for some reason.</div><div class="gmail_default"><br></div><div class="gmail_default">So, you can replace this code:</div><span><div class="gmail_default"><span style="font-size:12.8px"><br></span></div><div class="gmail_default"><span style="font-size:12.8px"> precp_mon_avg = new((/100,12/),"float")</span></div><div class="gmail_default"><span style="font-size:12.8px"><br></span></div><div class="gmail_default"><span style="font-size:12.8px"> precp_mon_avg=reshape(prec_<wbr>avg,(/100,12/))</span></div><div class="gmail_default"><span style="font-size:12.8px"><br></span></div></span><div class="gmail_default"><span style="font-size:12.8px">with just one line:</span></div><div class="gmail_default"><span style="font-size:12.8px"><br></span></div><div class="gmail_default"><div class="gmail_default"><span style="font-size:12.8px"><font face="monospace, monospace"> precp_mon_avg = reshape(prec_avg,(/100,12/))</font></span></div><div class="gmail_default"><br></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><span style="font-size:12.8px">--Mary</span></font></div><div class="gmail_default"><font face="arial, helvetica, sans-serif"><span style="font-size:12.8px"><br></span></font></div><div><span style="font-size:12.8px"></span></div></div></div></div><div class="gmail_extra"><br><div class="gmail_quote"><div><div class="h5">On Thu, Mar 16, 2017 at 1:48 PM, Ipshita Majhi <span dir="ltr"><<a href="mailto:ipmajhi@alaska.edu" target="_blank">ipmajhi@alaska.edu</a>></span> wrote:<br></div></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div class="h5"><div dir="ltr"><div>Dear NCL Users,</div><div><br></div><div>I am using shapefile to analyze data over India, thanks to Mary got the shape file working and then also got the data conformed. But when I am doing area average for each month the values are the same . I am not sure what is going wrong. I am pasting my code in this email.</div><div><br></div><div><br></div><div>;*****************************<wbr>*******************</div><div>load "$NCARG_ROOT/lib/ncarg/nclscri<wbr>pts/csm/gsn_code.ncl" </div><div>load "$NCARG_ROOT/lib/ncarg/nclscri<wbr>pts/csm/gsn_csm.ncl" </div><div>load "$NCARG_ROOT/lib/ncarg/nclscri<wbr>pts/csm/contributed.ncl" </div><div>load "$NCARG_ROOT/lib/ncarg/nclscri<wbr>pts/csm/shea_util.ncl" </div><div>;*****************************<wbr>*******************</div><div>;Read data to plot and mask</div><div>;*****************************<wbr>******************* </div><div>function mask_data_with_India_country(c<wbr>ountry_code,data) </div><div>begin</div><div><br></div><div>mask_start_time = get_cpu_time() ; For timing results</div><div><br></div><div>;---Convert rectilinear grid to 2D grid, but laid out as 1D array.</div><div> dims = dimsizes(data)</div><div> lat1d = ndtooned(conform_dims(dims,dat<wbr>a&$data!0$,0))</div><div> lon1d = ndtooned(conform_dims(dims,dat<wbr>a&$data!1$,1))</div><div><br></div><div> shapefile_name = "IND_adm0.shx"</div><div> ;---Open shapefile and read lat/lon values.</div><div> sfilename = "IND_adm0.shp"</div><div> f = addfile(sfilename,"r")</div><div> segments = f->segments</div><div> geometry = f->geometry</div><div> segsDims = dimsizes(segments)</div><div> geomDims = dimsizes(geometry)</div><div><br></div><div>;---Read global attributes </div><div> geom_segIndex = f@geom_segIndex</div><div> geom_numSegs = f@geom_numSegs</div><div> segs_xyzIndex = f@segs_xyzIndex</div><div> segs_numPnts = f@segs_numPnts</div><div> numFeatures = geomDims(0)</div><div> </div><div> lon = f->x</div><div> lat = f->y</div><div> nlatlon = dimsizes(lat)</div><div> </div><div> min_lat = min(lat)</div><div> max_lat = max(lat)</div><div> min_lon = min(lon)</div><div> max_lon = max(lon)</div><div><br></div><div> print("=======================<wbr>===========================")</div><div> print("Shapefile : " + sfilename)</div><div> print("min_lat " + min_lat)</div><div> print("max_lat " + max_lat)</div><div> print("min_lon " + min_lon)</div><div> print("max_lon " + max_lon)</div><div> </div><div> ii_latlon = ind(min_lat.le.lat1d.and.lat1d<wbr>.le.max_lat.and.\</div><div> min_lon.le.lon1d.and.lon1d.le.<wbr>max_lon)</div><div> nii = dimsizes(ii_latlon)</div><div> print(nii + " values to check")</div><div> print(numFeatures + " feature(s) to traverse with a maximum of " + \</div><div> nlatlon + " points")</div><div> </div><div> </div><div> ;---Create array to hold new data mask, and set all values to 0 initially.</div><div> data_mask_1d = new(dimsizes(lat1d),integer)</div><div> data_mask_1d = 0</div><div><br></div><div>;</div><div>; This is the loop that checks every point in lat1d/lon1d to see if it</div><div>; is inside or outside of the country. If it is inside, then data_mask_1d</div><div>; will be set to 1.</div><div>;</div><div> ikeep = 0 ; Counter to see how many points were found inside the country</div><div> do n=0,nii-1</div><div> ii = ii_latlon(n)</div><div> is_inside = False</div><div> i = 0</div><div> do while(.<a href="http://not.is_inside.and.i.lt" target="_blank">not.is_inside.and.i.lt</a>.<wbr>numFeatures)</div><div> startSegment = geometry(i, geom_segIndex)</div><div> numSegments = geometry(i, geom_numSegs)</div><div> do seg=startSegment, startSegment+numSegments-1</div><div> startPT = segments(seg, segs_xyzIndex)</div><div> endPT = startPT + segments(seg, segs_numPnts) - 1</div><div> if(data_mask_1d(ii).ne.1.and.<wbr>\</div><div> gc_inout(lat1d(ii),lon1d(ii),\</div><div> lat(startPT:endPT),lon(startP<wbr>T:endPT))) then</div><div> data_mask_1d(ii) = 1</div><div> ikeep = ikeep+1</div><div> is_inside = True</div><div> continue</div><div> end if</div><div> end do</div><div> i = i + 1</div><div> end do</div><div> end do</div><div> print(ikeep + " values kept")</div><div> print("=======================<wbr>===========================") </div><div><br></div><div>; Create a 2D data array of same size as original data,</div><div>; but with appropriate values masked.</div><div>;</div><div> data_mask = (where(onedtond(data_mask_1d,d<wbr>ims).eq.1,data,\</div><div> data@_FillValue))</div><div> copy_VarMeta(data,data_mask) ; Copy all metadata</div><div><br></div><div>;---Print timings</div><div> mask_end_time = get_cpu_time()</div><div> print("Elapsed time in CPU second for 'mask_data_with_India_country' = " + \</div><div> (mask_end_time-mask_start_tim<wbr>e))</div><div><br></div><div> return(data_mask)</div><div>end</div><div> </div><div>;-----------------------------<wbr>------------------------------<wbr>-----------</div><div>; Main code</div><div>;-----------------------------<wbr>------------------------------<wbr>-----------</div><div><br></div><div>;---Shapefile to use for masking. Using India (IND)</div><div>India_code = "IND"</div><div>India_name = "IND" + "_adm0"</div><div>India_shp = "IND_adm0.shp"</div><div><br></div><div>;---Read lat/lon off shapefile</div><div> s = addfile(India_shp,"r")</div><div> slat = s->y</div><div> slon = s->x</div><div><br></div><div>;---Read precipitation data to contour and mask</div><div> filename = "<a href="http://b.e11.B1850C5CN.f09_g16.005.cam.h0.PRECC.070001-079912.nc" target="_blank">b.e11.B1850C5CN.f09_g16.005.c<wbr>am.h0.PRECC.070001-079912.nc</a>"</div><div> f = addfile(filename,"r")</div><div> ts = f->PRECC(:,:,:)</div><div> </div><div><br></div><div>;---Mask "ts" against India shapefile outlines</div><div> ts_mask = mask_data_with_India_country(I<wbr>ndia_code,ts(0,:,:))</div><div> tm_3d=conform(ts,ts_mask,(/1,2<wbr>/))</div><div><br></div><div> </div><div><br></div><div> tm_3d@_FillValue = ts@_FillValue</div><div> </div><div>; copy_VarAtts(ts,tm_3d) </div><div> copy_VarCoords(ts,tm_3d)</div><div><br></div><div> print(tm_3d(100,{25},{70}))</div><div> print(tm_3d(110,{25},{74}))</div><div><br></div><div> printVarSummary(tm_3d)</div><div> printMinMax(tm_3d, True)</div><div><br></div><div> prec_avg = new((/1200/),"float")</div><div><br></div><div> do ii =0,1199</div><div> </div><div> prec_avg(ii) = avg(tm_3d(ii,:,:))</div><div><br></div><div> end do</div><div><br></div><div> precp_mon_avg = new((/100,12/),"float")</div><div><br></div><div> precp_mon_avg=reshape(prec_av<wbr>g,(/100,12/))</div><div><br></div><div><br></div><div> precp_mon = dim_avg_n(precp_mon_avg,0)</div><div><br></div><div> print(precp_mon)</div><span class="m_-3869342141319607219HOEnZb"><font color="#888888"><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div> </div><div><br></div><div><br></div>-- <br><div class="m_-3869342141319607219m_-2794746058020893777gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div><div><div>******************************<wbr>******************************<wbr>******************************<wbr>*************************</div><div><span style="font-size:small">"I slept and dreamt that life was joy. I awoke and saw that life was service. I acted and behold, service was joy." - Rabindranath Tagore</span><br></div><div><span style="font-size:small">******************************<wbr>******************************<wbr>******************************<wbr>**************************</span></div><div><br></div><div>Ipshita Majhi<br></div>PhD Candidate<br></div>University of Alaska , Fairbanks<br></div>Atmospheric Science Department<br></div><a href="tel:(907)%20978-4220" target="_blank" value="+19079784220">(907)978-4220</a> <a href="mailto:ipmajhi@alaska.edu" target="_blank">ipmajhi@alaska.edu</a><br></div></div></div></div>
</font></span></div>
<br></div></div>______________________________<wbr>_________________<br>
ncl-talk mailing list<br>
<a href="mailto:ncl-talk@ucar.edu" target="_blank">ncl-talk@ucar.edu</a><br>
List instructions, subscriber options, unsubscribe:<br>
<a href="http://mailman.ucar.edu/mailman/listinfo/ncl-talk" target="_blank" rel="noreferrer">http://mailman.ucar.edu/mailma<wbr>n/listinfo/ncl-talk</a><br>
<br></blockquote></div><br></div>
</blockquote></div><br><br clear="all"><br>-- <br><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div><div><div>*******************************************************************************************************************</div><div><span style="font-size:small">"I slept and dreamt that life was joy. I awoke and saw that life was service. I acted and behold, service was joy." - Rabindranath Tagore</span><br></div><div><span style="font-size:small">********************************************************************************************************************</span></div><div><br></div><div>Ipshita Majhi<br></div>PhD Candidate<br></div>University of Alaska , Fairbanks<br></div>Atmospheric Science Department<br></div>(907)978-4220 <a href="mailto:ipmajhi@alaska.edu" target="_blank">ipmajhi@alaska.edu</a><br></div></div></div></div>
</div>