如何計算R中窗口移動窗口（來回）和標準偏差的平均值？

Question

我有365個值從x [1]到x [365]。對於每個值，我必須考慮一個windoe（x-17，x + 17），所以將從x [18]開始。我想執行的計算是這樣的：我的價值觀

x=1:365 
first period = (x[18]-17 vaues,x[18]+17 values) 

例如（只有一個列在我的文件中存在是值）：

  values 
    1  0.2 
    2  0.3 
    .  . 
    365 0.4 

Answer 1

你可以滾動使用rollmean功能的意思動物園包。

# make some fake data 
mydat <- 1:365 
library(zoo) 
mymeans <- rollmean(mydat, k = 35) 

爲了讓你可以使用rollapply並提供其sd作爲函數應用

mysds <- rollapply(mydat, 35, FUN = sd) 

從那裏，你可以使用輸出做感興趣的轉型滾動標準偏差。

Answer 2

我認爲你正在尋找：

 library(zoo) 
     rollapply(zoo(rnorm(x18)), 34, function(x)mean(x)/sd(x))