将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)

这是你的工作吗？