如何使用独立栅格在Stack中分配一些值？

Question

我有几个栅格。我将它们全部堆叠起来以便稍后进行一些计算，但我想根据另一个栅格将所有图层中的一些值分配给NA。

代码：

library(raster)
r <- raster(nrows=10, ncols=10)
r <- setValues(r, 1:ncell(r))
r1 <- raster(nrows=10, ncols=10)
r1 <- setValues(r1, 1:ncell(r))
r2 <- raster(nrows=10, ncols=10)
r2 <- setValues(r1, 1:ncell(r))
St=stack(r,r1)
St[r2>1]==NA
#         layer.1 layer.2
#  [1,]      NA      NA
#  [2,]      NA      NA
#  [3,]      NA      NA
#  [4,]      NA      NA
#  [5,]      NA      NA

但是当我输入St时，我发现min和max是1和100，这意味着没有分配给NA？

St
# class       : RasterStack 
# dimensions  : 10, 10, 100, 2  (nrow, ncol, ncell, nlayers)
# resolution  : 36, 18  (x, y)
# extent      : -180, 180, -90, 90  (xmin, xmax, ymin, ymax)
# coord. ref. : +proj=longlat +datum=WGS84 
# names       : layer.1, layer.2 
# min values  :       1,       1 
# max values  :     100,     100 

Answer 1

这只是一个错字。您应该说St[r2>1]<-NA而不是St[r2>1]==NA。