2013-06-29 1 views
2

CSV 파일을 읽고 XTS 형식으로 변경하려고합니다. 그러나 CSV 형식으로 실행 중이며 문제는 별도의 열에 날짜 및 시간 필드가 있습니다.R이 CSV 데이터를 XTS로 변환하는 방법

2012.10.30,20:00,1.29610,1.29639,1.29607,1.29619,295 
2012.10.30,20:15,1.29622,1.29639,1.29587,1.29589,569 
2012.10.30,20:30,1.29590,1.29605,1.29545,1.29574,451 
2012.10.30,20:45,1.29576,1.29657,1.29576,1.29643,522 
2012.10.30,21:00,1.29643,1.29645,1.29581,1.29621,526 
2012.10.30,21:15,1.29621,1.29644,1.29599,1.29642,330 

나는

euXTS <- as.xts(read.zoo(file="EURUSD15.csv", sep=",", format="%Y.%m.%d", header=FALSE)) 

그것을에서 끌어하려고하지만 그것은 나에게 내가 타임 스탬프 첨부로이 어떻게 든 생각 때문에이 경고 메시지를 제공하지만, 내가 할 수있는 최선의 방법 확실하지 않다 그.

Warning message: 
In zoo(rval3, ix) : 
Some methods for “zoo” objects do not work if the index entries in ‘order.by’ are not unique 

답변

6

동물원 개체에 직접 TS를 읽을 read.zoo를 사용하는 것이 좋습니다 은 쉽게 하나를 XTS하는 강제 :

library(xts) 
ts.z <- read.zoo(text='2012.10.30,20:00,1.29610,1.29639,1.29607,1.29619,295 
2012.10.30,20:15,1.29622,1.29639,1.29587,1.29589,569 
2012.10.30,20:30,1.29590,1.29605,1.29545,1.29574,451 
2012.10.30,20:45,1.29576,1.29657,1.29576,1.29643,522 
2012.10.30,21:00,1.29643,1.29645,1.29581,1.29621,526 
2012.10.30,21:15,1.29621,1.29644,1.29599,1.29642,330', 
     sep=',',index=1:2,tz='',format="%Y.%m.%d %H:%M") 
as.xts(ts.z) 

         V3  V4  V5  V6 V7 
2012-10-30 20:00:00 1.29610 1.29639 1.29607 1.29619 295 
2012-10-30 20:15:00 1.29622 1.29639 1.29587 1.29589 569 
2012-10-30 20:30:00 1.29590 1.29605 1.29545 1.29574 451 
2012-10-30 20:45:00 1.29576 1.29657 1.29576 1.29643 522 
2012-10-30 21:00:00 1.29643 1.29645 1.29581 1.29621 526 
2012-10-30 21:15:00 1.29621 1.29644 1.29599 1.29642 330 
+0

감사합니다 순전히! 그게 하나의 열로 강요하기 위해 인덱스 = 1 : 2가 필요한 것입니다. – Jerry