Rでシェープファイルを使用してラスターをクリッピングしますが、シェープファイルのジオメトリを維持します

Question

{raster}を使用して、不規則なシェープファイル（Amazonバイオーム）に基づいてラスターをクリップ（またはトリミング）していますが、出力には常に長方形の範囲があります。ただし、シェープファイルとまったく同じジオメトリの出力が必要です。任意のヒント？乾杯。

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")

Answer 1

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)