可以通过使用平日功能来完成。
< df = data.frame(date=c("2020-07-01", "2020-08-10", "2020-11-15")) < df$day <- weekdays(as.Date(df$date)) < df date day 1 2020-07-01 Wednesday 2 2020-08-10 Monday 3 2020-11-15 Sunday