powered by
getCRS(obj, ...)
"Spatial"
"Raster"
sp::CRS
raster::raster
check_projection
data(eberg_grid) coordinates(eberg_grid) <- ~x+y gridded(eberg_grid) <- TRUE proj4string(eberg_grid) <- CRS("+init=epsg:31467") r <- raster(eberg_grid[1]) getCRS(r) r.ll <- reproject(r) getCRS(r.ll)
Run the code above in your browser using DataLab