mask1<-resample(dem2, ro1) mask1[mask1<1]<-0 mask1[mask1>0]<-1 mask1[mask1==0]<-NA ro2<-ro1*mask1 svglite("maya_area_july_2004_precipitation_1.svg", width = 6, height =...
-F+f15p,1,black+a0+jTL gmt end pdf2svg maya.pdf maya_area_july_precipitation_difference_2004_1980_1.svg pdftoppm -png -rx 1100 -ry 1400 maya.pdf maya_july_aridity_index_2...
