首先,我读取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) 会做你想做的。

许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top