USA borders projected in the AEA coordinate system.
download.file("http://www.census.gov/geo/cob/bdy/st/st00shp/st99_d00_shp.zip", destfile=paste(getwd(), "/usa_borders.zip", sep="")) unzip(zipfile="usa_borders.zip", exdir=getwd()) unlink("usa_borders.zip") # read to R: usa_borders.ll <- readOGR("st99_d00.shp", "st99_d00") proj4string(usa_borders.ll) <- CRS("+proj=longlat +ellps=WGS84") usa_borders.ll <- as(usa_borders.ll, "SpatialLinesDataFrame") AEA <- "+proj=aea +lat_1=29.5 +lat_2=45.5 +lat_0=23 +lon_0=-96 +x_0=0 +y_0=0 +ellps=GRS80 +datum=NAD83 +units=m +no_defs" USA.borders <- spTransform(usa_borders.ll, CRS(AEA)) save(usa_borders.ll, file="usa_borders.RData")
Formal class 'SpatialLinesDataFrame' [package "sp"] with 4 slots ..@ data :'data.frame': 273 obs. of 10 variables: ..@ lines :List of 273 ..@ bbox : num [1:2, 1:2] -179.1 17.9 179.8 71.4 .. ..- attr(*, "dimnames")=List of 2 ..@ proj4string:Formal class 'CRS' [package "sp"] with 1 slots
U.S. Dept of Commerce
Attachment | Size |
---|---|
usa_borders.RData [1] | 1.77 MB |
Links:
[1] http://spatial-analyst.net/book/system/files/usa_borders.RData