XTS應用家庭和多列XTS？

Question

如何使用功能家族的功能，如apply.daily多元XTS？

因此，例如：

 
Time,a,b 
... 
2012-02-11 16:21:24 4.7258 7.7258 
2012-02-11 16:26:25 4.9096 12.3796 
2012-02-11 16:31:25 4.7904 2.2204 
... 

我怎麼會用柱使用apply.daily和mean到整個矩陣。因此，結果將是當天的單個時間戳，下一列的平均值爲a，之後的列爲平均值b。

我想爲任意數列（不知道列和名稱金額 - 當然，所有的數值）做到這一點。

Answer 1

你可以簡單地使用colMeans採取每列的平均值：

library(quantmod) 
getSymbols("SPY") 
spy1 <- apply.weekly(SPY, colMeans) 

你也可以定義使用apply在你的對象列的任意函數：

spy2 <- apply.weekly(SPY, function(x) apply(x,2,mean)) 
identical(spy1,spy2) 
# [1] TRUE