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"]