롤링 지난 아닌 값을 감지 -내가 아래 일련의이 창
, 출력은 롤링 기준으로이 시리즈의 최신 아닌 값이다 내가하고 싶은set.seed(107)
test <- as.xts(rep(0,1000),Sys.Date()-1:1000)
test[sample(1000,50)] <- abs(100 * (1+rnorm(50)))
.
예를 들어 롤링 기간을 20 일로 설정하십시오. 따라서 각 날짜의 출력은 그 이전 20 일 동안의 마지막 0이 아닌 값으로 출력됩니다.
TTR 패키지에서 runxxx 함수를 찾으려고했지만 아무 것도 나왔습니다.
감사합니다. 감사. lapply
및 사용자 정의 기능을 사용
안녕하세요. 답장을 보내 주셔서 감사합니다. 그것은 작동합니다. 그러나 나는 직접 기능을 썼다. 나는 여기도 게시 할 것이고, 이는 좀 더 간결하다. – prateek1592
논리는 동일합니다. 다행 이네. 미래의 간단한 윈도우 조작을 위해서'rollapply'를주의하십시오. – OdeToMyFiddle
예, 그렇습니다. 그리고 그렇게 해! 감사 :-) – prateek1592