overlay - terra パッケージを使用した SpatRaster とベクトル間の数学演算

Question

app()家族の機能について簡単な質問があります

(n 個の値の) ベクトルをラスターで除算し、n 個の結果のラスタ​​ーを取得したい

s <- rast(system.file("ex/logo.tif", package="terra"))[[1]] 

lapp(s, aa = c(1, 10, 100, 1000), function(x, aa){0.46 * aa/(x + 1)})

同じことが SpatRasterDataset で行われることを知りたいです。それは可能ですか？

次に例を示します。

fun = function(i, j) { 
    v <- c(1, 10, 100, 1000)
    f <- i + j
    v / f
}
srd <- sds(list(i = s, j = s/10))
r <- lapp(srd, fun = fun, recursive = TRUE )