XTS - x 일 전에 데이터를 가져 오는 방법

Question

XTS 개체의 특정 날짜 또는 특정 날짜의 데이터를 가져 오는 방법을 알고 있습니다.

x12 일 전 데이터를 XTS에서 어떻게받을 수 있습니까?

내 XTS의 최신 날짜가 오늘이며 일주일 전에 데이터 행을 추출하려고한다고 가정합니다. 어떻게 생겼어?

Answer 1

예 데이터 세트 :

이

library(xts) 
data(sample_matrix) 
sample.xts <- as.xts(sample_matrix, descr='my new xts object') 

> head(sample.xts) 
#    Open  High  Low Close 
# 2007-01-02 50.03978 50.11778 49.95041 50.11778 
# 2007-01-03 50.23050 50.42188 50.23050 50.39767 
# 2007-01-04 50.42096 50.42096 50.26414 50.33236 
# 2007-01-05 50.37347 50.37347 50.22103 50.33459 
# 2007-01-06 50.24433 50.24433 50.11121 50.18112 
# 2007-01-07 50.13211 50.21561 49.99185 49.99185 

당신은 수학 연산자 + 및 날짜와 -를 사용할 수 있습니다.

refDate <- as.Date("2007-01-07") # a reference date 

sample.xts[refDate] 
#    Open  High  Low Close 
# 2007-01-07 50.13211 50.21561 49.99185 49.99185 

sample.xts[refDate - 3] # 3 days before 
#    Open  High  Low Close 
# 2007-01-04 50.42096 50.42096 50.26414 50.33236 

그건 그렇고 : 오늘의 날짜는 Sys.Date()입니다.

Sys.Date() 
# [1] "2013-12-10"