동물원에서 데이터를 껍질을 벗기는 법

Question

내 데이터 (동물원의 시계열)를 없애는 기능이 있습니까?

예는

mytime<-as.POSIXct(paste("2013-07-09 12:", c(1:59), sep="")) 
mydata<-EuStockMarkets[1:59] 
myts<-zoo(mydata, mytime) 

내가 의해 10 점을 말할 수 이전 시간 단계에 다른 단지 그 데이터 불규칙한 시계열을 반환하는 함수를 검색 할 것이다.

동물원에 대한 의견이 있으십니까 ??

는

바스티안

Answer 1

이 subset을 시도 감사 :

> subset(myts, diff(myts) > 10) 
2013-07-09 12:04:00 2013-07-09 12:07:00 2013-07-09 12:10:00 2013-07-09 12:22:00 
      1621.04    1630.75    1645.89    1616.67 
2013-07-09 12:28:00 2013-07-09 12:32:00 2013-07-09 12:37:00 2013-07-09 12:38:00 
      1631.87    1650.43    1524.28    1603.65 
2013-07-09 12:39:00 2013-07-09 12:40:00 2013-07-09 12:41:00 
      1622.49    1636.68    1652.10 

사용 abs(diff(myts)) 어느 방향이 필요합니다.