2017-10-08 15 views
1

作成した新しい環境にあるすべての(xts)オブジェクトを結合したいと思います。私が思いついた最高のものは、eapply関数を使った次のものです。私はeapplyを使用しました。なぜなら、それは環境内のすべてのオブジェクトを必要とし、何か良いものを思いつくことができないからです。環境内のすべてのxtsオブジェクトをマージする方法

これは各オブジェクトの値の先頭を取りますが、オブジェクト全体が必要です。

plist <- eapply(dataEnv, head) 
pframe <- do.call(merge, plist) 

答えて

2

オブジェクト全体が必要なので、環境をリストに変換するだけで済みます。すでに完了しているように、do.call()を使用してマージします。たとえば、

library(quantmod) 
e <- new.env() 
getSymbols("IBM;MSFT", env = e) 
pframe <- do.call(merge, as.list(e)) 
head(pframe) 
#   IBM.Open IBM.High IBM.Low IBM.Close IBM.Volume IBM.Adjusted 
# 2007-01-03 97.18 98.40 96.26  97.27 9196800  76.18299 
# 2007-01-04 97.25 98.79 96.88  98.31 10524500  76.99751 
# 2007-01-05 97.60 97.95 96.91  97.42 7221300  76.30047 
# 2007-01-08 98.50 99.50 98.35  98.90 10340000  77.45959 
# 2007-01-09 99.08 100.33 99.07 100.07 11108200  78.37598 
# 2007-01-10 98.50 99.05 97.93  98.89 8744800  77.45180 
#   MSFT.Open MSFT.High MSFT.Low MSFT.Close MSFT.Volume MSFT.Adjusted 
# 2007-01-03  29.91  30.25 29.40  29.86 76935100  23.08097 
# 2007-01-04  29.70  29.97 29.44  29.81 45774500  23.04231 
# 2007-01-05  29.63  29.75 29.45  29.64 44607200  22.91091 
# 2007-01-08  29.65  30.10 29.53  29.93 50220200  23.13508 
# 2007-01-09  30.00  30.18 29.73  29.96 44636600  23.15826 
# 2007-01-10  29.80  29.89 29.43  29.66 55017400  22.92637 
+0

ありがとう!実際に私が投稿する前に、私はそれをしようとしましたが、いくつか不思議なエラーメッセージがありました。それは今働く)))) – user8369515

関連する問題