将XTS月份的最后一个工作日索引转换为月份的最后一天

Question

我有一个XTS对象，其中包含每月数据。 但是，原始数据中的日期当前是该月的最后一个工作日，我希望它是该月的最后一天。

有没有一种方法可以转换XTS对象，以便索引具有该月的最后一天？

谢谢

Answer 1

看一下bsts包和LastDayInMonth()函数。

说这是您的数据：

df <- data.frame(ID = 1:7, 
                 Date=as.Date(c("2007-01-01", "2007-01-31", "2008-02-01", "2008-02-29",
                                "2008-03-14", "2008-12-01", "2008-12-31")), 
                 stringsAsFactors = F)

您可以像这样获取新日期：

library(bsts)
df$New_Date <- LastDayInMonth(df$Date)

这是你的追求吗？