XTS時系列オブジェクトで毎月末にHTインデックスRSI値

Question

最初にCSVを読み取り、XTSオブジェクトを作成します。

require(quantmod)

sugar  <- as.xts(read.zoo("SUGAR.CSV", sep=",", format ="%m/%d/%Y", header=TRUE))

次に、TTRを使用して新しいシリーズのRSI値を作成します（QuantMODにロード）

sugarRSI <- RSI(sugar)

今、私は毎月の最終日の価値のみを含む新しいシリーズを手に入れたいと思います。 XTSには最後の（）関数がありますが、効率的に展開する方法については明確ではありません。

Answer 1

おもう apply.monthly(sugarRSI, last) あなたが望むことをします。