Advertisement
Guest User

Untitled

a guest
Apr 23rd, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.71 KB | None | 0 0
  1. # load packages
  2. require(raster)
  3. require(rgdal)
  4.  
  5. # Step 1: read in raster from .tif file
  6. r <- raster("C:/.../raster.tif")
  7. # Q: how do you do this with a .sid file?
  8.  
  9. # read in shapefile used for clip
  10. shp <- readOGR(dsn="C:/.../folder", layer="shapefile")
  11.  
  12. # Step 2: clip raster to shapefile
  13. r.clip <- crop(r, shp)
  14.  
  15. # Step 3: save clipped raster as tiff
  16. writeRaster(r.clip, "C:/.../raster_clip.tif", format="GTiff")
  17.  
  18. library(rgdal)
  19. r <- readGDAL("C:/.../raster.sid")
  20.  
  21. library(gdalUtils)
  22. gdal_setInstallation(search_path =...) # choose GDAL version with this function
  23. r <- gdal_translate(src_dataset = "C:/.../raster.sid",
  24. dst_dataset = "raster.tif",
  25. output_Raster = TRUE) # create R raster object
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement