toEPSG: Transform Spatial* objects among coordinate systems I...

In scrogster/scrogR: Some functions useful to me

Description

toEPSG converts a Spatial* object to another coordinate system, based on EPSG code Actual conversion is done by spTransform from package maptools

Usage

toEPSG(spobj, EPSG = 3111)

Arguments

spobj	A Spatial* object.
EPSG	An EPSG code

Details

This should work for any EPSG code provided at http://spatialreference.org/ref/epsg/

toVicgrid(spobj) is a convenient shortcut to convert to Vicgrid (epsg 3111)

toMGA55(spobj) is a convenient shortcut to convert to MGA55

toMGA54(spobj) is a convenient shortcut to convert to MGA54

toWGS84(spobj) is a convenient shortcut to convert to WGS84

Value

A Spatial* object in the specified coordinate system.

Author(s)

Michael Scroggie

Examples

cities_wgs<-SpatialPointsDataFrame(coords=cities[,-1], data=data.frame(city=cities$city), proj4string=CRS("+init=epsg:4326"))
citiesVG<-toEPSG(cities_wgs, 3111)
plot(citiesVG, xlab="Easting", ylab="Northing", main="Victorian cities in Vicgrid coordinate system")
axis(1)
axis(2)
box()

scrogster/scrogR documentation built on May 8, 2019, 1 a.m.