如何使用 Sys.Date() 或 today() 将日期重新编码为字符串或 R 中的因子？

Question

作为自动化过程的一部分，我有一个带有日期变量的 df。只有今天和昨天两个日期级别。
我正在寻找重新编码这个日期变量，以便今天和昨天的日期在 %d-%m-%Y 格式

df %>% 
  mutate(date2 = recode(date, "today" = Sys.Date(), "yesterday" = Sys.Date()-1))

这returns一个错误： UseMethod("recode") 错误：没有适用于 'recode' 的方法应用于 class "Date"

的对象

如果有任何建议，我将不胜感激

Answer 1

我想这就是你想要的？使用 case_when 检查日期是否等于 today()，如果是，则分类为 'today'，否则分类为 'yesterday'?

df %>% 
mutate(date2 = case_when(
date==lubridate::today() ~ "Today",
TRUE ~ "Yesterday"))

How to recode a date using Sys.Date() or today() into a string or factor in R?