题
首先,我读取CSV并创建XTS对象。
require(quantmod)
sugar <- as.xts(read.zoo("SUGAR.CSV", sep=",", format ="%m/%d/%Y", header=TRUE))
然后,我使用TTR(带Quantmod的负载)创建一个新的RSI值系列
sugarRSI <- RSI(sugar)
现在,我想获得一个新系列,其中仅包括每个月的最后一天的价值。 XTS中有一个()函数,但尚不清楚如何有效部署它。
解决方案
我认为 apply.monthly(sugarRSI, last)
会做你想做的。
不隶属于 StackOverflow