有效地定义多个特定日期

Question

我尝试优化我的代码。如何更有效地定义特定日期以便以后使用它们？例如：

Monday <- as.Date("23.01.2021", "%d.%m.%Y")
Tuesday <- as.Date("04.04.2020", "%d.%m.%Y")
Wednesday <- as.Date("15.09.2021", "%d.%m.%Y")
Thursday <- as.Date("30.03.2021", "%d.%m.%Y")
Friday <- as.Date("08.08.2019", "%d.%m.%Y")

非常感谢

Answer 1

很大程度上取决于你想如何使用它。

一种方法是创建一个命名向量。

可能从指定日期起 5 天

dateV <- as.Date("2021-08-23") + 1:5

或范围之间的日期

dateV <-seq(as.Date("2021-08-23"), as.Date("2021-08-27"), by="days")

然后添加工作日的名称。

names(dateV) <- weekdays(dateV)

从那里您可以像这样获得所需的 DoW

dateV['Wednesday']

另外，如果您正在处理日期，我会熟悉 lubridate 包。