움직이는 창 (앞뒤)의 평균과 R의 창에 대한 표준 편차를 계산하는 방법?

Question

x [1]에서 x [365]까지 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를 사용하고 관심의 변환을 수행하는 출력을 사용할 수 거기에서

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

을 적용 함수로 sd 그것을 제공 할 수 롤링 표준 편차를 얻으려면.

Answer 2

난 당신이 찾고있는 생각 :

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