我正在处理的数据仅包括月份的日期和月份,如下所示:
date time sales
<chr> <chr> <chr>
1 11/08 09:00 84.15
2 11/08 10:00 503.08
3 11/08 11:00 674.25
4 11/08 12:00 596.75
5 11/08 13:00 338.05
6 11/08 14:00 343.35
有没有办法将年份添加到日期部分来复制这个:
date time sales
<chr> <chr> <chr>
1 11/08/2022 09:00 84.15
2 11/08/2022 10:00 503.08
3 11/08/2022 11:00 674.25
4 11/08/2022 12:00 596.75
5 11/08/2022 13:00 338.05
6 11/08/2022 14:00 343.35
我希望最终使用 lubridate 添加一个新列,根据日期显示星期几;但是,如果日期中不包含年份,我找不到办法做到这一点。
感谢您的帮助!
您可以先使用
/2022
添加 paste0
到您的字符列,然后使用 weekdays
中的 lubridate
和 as.Date
得到这样的工作日:
df$date = paste0(df$date, "/2022")
library(lubridate)
df$week_day = weekdays(as.Date(df$date, "%d/%m/%Y"))
df
#> date time sales week_day
#> 1 11/08/2022 09:00 84.15 Thursday
#> 2 11/08/2022 10:00 503.08 Thursday
#> 3 11/08/2022 11:00 674.25 Thursday
#> 4 11/08/2022 12:00 596.75 Thursday
#> 5 11/08/2022 13:00 338.05 Thursday
#> 6 11/08/2022 14:00 343.35 Thursday
创建于 2023-03-17 与 reprex v2.0.2