2014-04-12 1 views
2

의 XTS 객체는 내가 다른 XTS 객체를 병합 할 병합는 다른 크기

library("quantmod") 
library("PerformanceAnalytics") 
library("zoo") 

ticks <- c("ABB","GEBN.VX","HOLN.VX") 
starting.date<-as.Date("2012-01-01") 
Data<-new.env() 
getSymbols(ticks, env = Data, src = "yahoo", from = starting.date) 

다음 내가이 xts 개체의 목록을 제공합니다 eapply

returns <- eapply(Data,dailyReturn,type="log") 

사용하여 수익을 계산합니다.

merged.returns <- merge(returns) 

나는 또한 옵션 fill=NA, join="inner"을 시도하지만 난 항상 같은 오류 메시지가 :

Error in data.frame(HOLN.VX = c(-0.00629152721948027, -0.0298954647966263, : 
arguments imply differing number of rows: 833, 824, 723, 849 

가 어떻게이 문제를 해결할 수

내 목표는 병합을 사용하여 이러한 개체를 병합하는 것입니다?

답변

3

해결책을 찾았습니다. 우리는이 문제를 해결하기 위해 do.call

do.call(merge,returns) 

을 사용해야합니다.