R：SQL旋回しXTSには、オブジェクト

Question

単純なクエリは、3つの列が返されます。次のように楽器、日付、価格

データを：私はしたいことは、次のように見えるピボットXTS-オブジェクトである

library("xts") 
dta = data.frame(
    sample(x=c("a", "b", "c", "d", "e", "f"), size=367, replace=TRUE), 
    c(as.Date('2016-01-01') + 0:366), 
    c(0:366)) 
names(dta) <- c("instr", "date", "price") 

：

 
      "a" "b" "c" "d" "e" "f" 
2016-01-01 1  NA NA NA NA NA 
2016-01-02 NA 2  NA NA NA NA 
2016-01-03 3  NA NA NA NA NA 
2016-01-04 NA NA NA NA 4  NA 
... 

私は "楽器" -vectorsにデータを分割することを考えた：

list_of_instr_vectors <- split(dta, dta$instr) 

リストのすべてのdata.framesをxts-objectsおよびmerge.xtsに変換します。どのように

xts_dta = as.xts(dta, order.by = dta$date) 

そして、そのデータをピボット...しかし：

多分XTSに最初からdata.frameをオンにする方が簡単でしょうか？

私は確信しています、この共通のタスクを達成するための簡単な方法があります...しかし、どのように？

ありがとうございました！ split引数と マルコ

Answer 1

使用read.zoo：

z <- read.zoo(dta, split = 1, index = 2) 
as.xts(z) 

の