Project the values of a Raster* object to a new Raster* object with another projection (coordinate reference system, (CRS)).
You can do this by providing the new projection as a single argument in which case the function sets the extent and resolution of the new object. To have more control over the transformation, and, for example, to assure that the new object lines up with other datasets, you can provide a Raster* object with the properties that the input data should be projected to.
projectExtent returns a RasterLayer with a projected extent, but without any values. This RasterLayer can then be adjusted (e.g. by setting its resolution) and used as a template 'to' in projectRaster.
Note
If the resolution of the output is much larger than that of the input, you should first aggregate the input such that the resolution of the input becomes more similar (perhaps a little smaller) to the output.
projectRaster(from, to, res, crs, method="bilinear", alignOnly=FALSE, over=FALSE, filename="",...)projectExtent(object, crs)
Arguments
from: Raster* object
to: Raster* object with the parameters to which 'from' should be projected
res: single or (vector of) two numerics. To, optionally, set the output resolution if 'to' is missing
crs: character or object of class 'CRS'. PROJ.4 description of the coordinate reference system. In projectRaster this is used to set the output CRS if 'to' is missing, or if 'to' has no valid CRS
method: method used to compute values for the new RasterLayer. Either 'ngb' (nearest neighbor), which is useful for categorical variables, or 'bilinear' (bilinear interpolation; the default value), which is appropriate for continuous variables.
alignOnly: logical. Use to or other parameters only to align the output (i.e. same origin and resolution), but use the projected extent from from
over: logical. If TRUE wrapping around the date-line is turned off. This can be desirable for global data (to avoid mapping the same areas twice) but it is not desirable in other cases
filename: character. Output filename
...: additional arguments as for writeRaster
object: Raster* object
Details
There are two approaches you can follow to project the values of a Raster object.
Provide a crs argument, and, optionally, a res argument, but do not provide a to argument.
Create a template Raster with the CRS you want to project to. You can use an existing object, or use projectExtent for this or an existing Raster* object. Also set the number of rows and columns (or the resolution), and perhaps adjust the extent. The resolution of the output raster should normally be similar to that of the input raster. Then use that object as from argument to project the input Raster to. This is the preferred method because you have most control. For example you can assure that the resulting Raster object lines up with other Raster objects.
Projection is performed using the PROJ library.
Also see projInfo('proj'), projInfo('ellps'), and projInfo('datum') for valid PROJ.4 values.
Note
User beware. Sadly, the PROJ.4 notation has been partly deprecated in the GDAL/PROJ library that is used by this function. You can still use it, but only with the the WGS84 datum. Other datums are silently ignored.
When printing a Spat* object the PROJ.4 notation is shown because it is the most concise and clear format available. However, internally a WKT representation is used (see crs).
Vector (points, lines, polygons) can be transformed with spTransform.
projectExtent does not work very well when transforming projected circumpolar data to (e.g.) longitude/latitude. With such data you may need to adjust the returned object. E.g. do ymax(object) <- 90
Returns
RasterLayer or RasterBrick object.
Author(s)
Robert J. Hijmans and Joe Cheng
See Also
resample
Examples
# create a new (not projected) RasterLayer with cellnumbers as valuesr <- raster(xmn=-110, xmx=-90, ymn=40, ymx=60, ncols=40, nrows=40, crs="+proj=longlat")r <- setValues(r,1:ncell(r))projection(r)# proj.4 projection descriptionnewproj <-"+proj=lcc +lat_1=48 +lat_2=33 +lon_0=-100 +datum=WGS84"#simplest approachpr1 <- projectRaster(r, crs=newproj)# alternatively also set the resolutionpr2 <- projectRaster(r, crs=newproj, res=20000)# inverse projection, back to the properties of 'r'inv <- projectRaster(pr2, r)# to have more control, provide an existing Raster object, here we create one# using projectExtent (no values are transferred)pr3 <- projectExtent(r, newproj)# Adjust the cell size res(pr3)<-200000# now projectpr3 <- projectRaster(r, pr3)