私は、不規則なシェープファイル (アマゾンのバイオーム) に基づいてラスターをクリップ (または切り取る) するために {raster} を使用していますが、出力の範囲は常に長方形です。ただし、シェープファイルとまったく同じジオメトリで出力する必要があります。何かヒントはありますか? よろしくお願いします。
library(raster)
library(rgdal)
myshp <- readOGR("Amazon.shp", layer="Amazon")
e <- extent(myshp)
myraster <- raster("Temperature.tif")
myraster.crop <- crop(myraster, e, snap="out", filename="myoutput.tif")
ベストアンサー1
一つの選択肢はraster::mask()
library(maptools) ## For wrld_simpl
library(raster)
## Example SpatialPolygonsDataFrame
data(wrld_simpl)
SPDF <- subset(wrld_simpl, NAME=="Brazil")
## Example RasterLayer
r <- raster(nrow=1e3, ncol=1e3, crs=proj4string(SPDF))
r[] <- 1:length(r)
## crop and mask
r2 <- crop(r, extent(SPDF))
r3 <- mask(r2, SPDF)
## Check that it worked
plot(r3)
plot(SPDF, add=TRUE, lwd=2)