r - 将收集的最后日期设置为星期一

Question

我可以使用 Quantmod 下载数据集

library(quantmod)
getSymbols("SPY", from="2013-01-01", to=Sys.Date())
chartSeries(SPY)

我希望最后一次收集的数据总是在星期一（所以如果我在星期四收集数据，星期二、星期三和星期四的数据点将被过滤掉）。有没有办法做到这一点。

谢谢您的帮助。

Answer 1

replace your to=Sys.Date() with to=(Sys.Date()-c(6:0))[format((Sys.Date()-c(6:0)),"%w")=="1"]