xts의 서브 세트 데이터 범위의 값을 R

Question

을 사용하여 수정하십시오. getSymbols를 사용하여 quantmod를 사용하고 주식 값을 다운로드 중입니다. 원본 데이터의 데이터가 일정 기간 동안 올바르지 않은 것으로 나타났습니다. 불행히도 데이터는 Google에서 사용할 수 없습니다. 대한 2008-07-29 2008-08-14에 대한

stock <- 'RELIANCE.BO' 
getSymbols(stock) 
stockAdjusted <- adjustOHLC(RELIANCE.BO, adjust = c("split","dividend"), use.Adjusted = FALSE, ratio = NULL) 
stockAdjusted <- stockAdjusted[!(apply(stockAdjusted, 1, function(y) any(y == 0))),] 

가격 값은해야한다의 절반입니다. 이 날짜 범위의 값을 수정하려면 어떻게합니까?

Answer 1

[의 일반 색인 생성을 사용하여 지정된 기간 및 열의 데이터에 액세스 할 수 있습니다. 2008-07-29 2008-08-14까지 기간에 대한, 말, 열 RELIANCE.BO.Adjusted을 얻으려면 간단하게 작성할 수 있습니다

stockAdjusted["2008-07-29/2008-08-14", "RELIANCE.BO.Adjusted"] 
##   RELIANCE.BO.Adjusted 
## 2008-07-29    961.0422 
## 2008-07-30    996.9914 
## 2008-07-31   1016.8096 
## 2008-08-01   1059.9302 
## 2008-08-04   1033.5398 
## 2008-08-05   1048.9796 
## 2008-08-06   1058.1328 
## 2008-08-07   1046.8594 
## 2008-08-08   1037.1992 
## 2008-08-11   1072.0240 
## 2008-08-12   1079.5088 
## 2008-08-13   1078.8912 
## 2008-08-14   1048.6570 

데이터 프레임과 마찬가지로, 당신은 할당을하는 것도 인덱싱을 사용할 수 있습니다. 요청한 날짜 범위에 대해서만 RELIANCE.BO.Adjusted 열에 2를 곱하려면 다음을 수행하십시오.

stockAdjusted["2008-07-29/2008-08-14", "RELIANCE.BO.Adjusted"] <- stockAdjusted["2008-07-29/2008-08-14", "RELIANCE.BO.Adjusted"] * 2