#r #lubridate
#r #lubridate
Вопрос:
date_diff <- ifelse(wday(today(), label = TRUE) == "Mon", 3, 1)
date_prior <- str_replace_all(today() - date_diff, pattern = "-", replacement = "")
Я продолжаю получать сообщение об ошибке ниже при попытке запустить приведенный выше скрипт.
Ошибка в wday(today(), label = TRUE): неиспользуемый аргумент (label = TRUE)
Комментарии:
1. Используйте
lubridate::wday
, вы, вероятно, используетеdata.table::wday
. Проверьте вывод наdata.table::wday(today(), label = TRUE)
иlubridate::wday(today(), label = TRUE)