Sliding window in R

Question

2次元行列ではなく、ベクトルだけでなく、Rにスライディングウィンドウ法があるかどうか知りますか？行列に格納された画像にメディアン関数を適用する必要があります

Answer 1

focal()が優秀なラスタパッケージに含まれています。これは以下の例に示されているものを超えていくつかの議論があり、必要であれば非長方形のスライディングウィンドウを指定するために使用できます。

library(raster) 

## Create some example data 
m <- matrix(1, ncol=10, nrow=10) 
diag(m) <- 2 
r <- as(m, "RasterLayer") # Coerce matrix to RasterLayer object 

## Apply a function that returns a single value when passed values of cells 
## in a 3-by-3 window surrounding each focal cell 
rmean <- focal(r, w=matrix(1/9, ncol=3, nrow=3), fun=mean) 
rmedian <- focal(r, w=matrix(1/9, ncol=3, nrow=3), fun=median) 

## Plot the results to confirm that this behaves as you'd expect 
par(mfcol=c(1,3)) 
plot(r) 
plot(rmean) 
plot(rmedian) 

## Coerce results back to a matrix, if you so desire 
mmean <- as(rmean, "matrix")