Good Morning:
I would like to edit the county warning area boundaries shapefile
"w_15jl09.shp" downloaded from:
_http://www.weather.gov/geodata/catalog/wsom/html/cwa.htm_
(http://www.weather.gov/geodata/catalog/wsom/html/cwa.htm)
Several of the shapefile's polygons contain extremely small "holes" that I
would like to exclude from my plots. For example, I would like to remove
slot 2 from the polygon for area 'RIW' (see below) and save the results in
a new shapefile.
Any suggestions would be appreciated.
Joe
#########################################################
> ##################################################################
> setwd('C:\\maps\\shapefiles\\NOAA')
> ##################################################################
> require(maptools)
> ##################################################################
> Rmaps=readShapePoly("w_15jl09.shp")
> (polypick=which(_rm...@data$wfo=='RIW'_ (mailto:rm...@data$wfo=='RIW') ))
[1] 117
> Rmaps2=Rmaps[polypick,]
> plot(Rmaps2)
> # Note the small 'line segment' in the north central interior of
> # the polygon
> _rm...@polygons[[polypick_ (mailto:rm...@polygons[[polypick) ]]
An object of class âPolygonsâ
Slot "Polygons":
[[1]]
An object of class âPolygonâ
Slot "labpt":
[1] -108.79378 43.17401
Slot "area":
[1] 16.30971
Slot "hole":
[1] FALSE
Slot "ringDir":
[1] 1
Slot "coords":
[,1] [,2]
[1,] -107.9355 41.57830
[2,] -107.9357 41.40699
<snipped out for email>
[214,] -107.9355 41.57830
[[2]]
An object of class âPolygonâ
Slot "labpt":
[1] -108.56076 44.16804
Slot "area":
[1] 8.137762e-08
Slot "hole":
[1] TRUE
Slot "ringDir":
[1] -1
Slot "coords":
[,1] [,2]
[1,] -108.5508 44.16797
[2,] -108.5748 44.16815
[3,] -108.5566 44.16801
[4,] -108.5508 44.16797
Slot "plotOrder":
[1] 1 2
Slot "labpt":
[1] -108.79378 43.17401
Slot "ID":
[1] "116"
Slot "area":
[1] 16.30971
**************A Good Credit Score is 700 or Above. See yours in just 2 easy
steps!
(http://pr.atwola.com/promoclk/100126575x1222377049x1201454365/aol?redir=http://www.freecreditreport.com/pm/default.aspx?sc=668072&hmpgID=62&bcd=
JunestepsfooterNO62)
[[alternative HTML version deleted]]
_______________________________________________
R-sig-Geo mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-geo
