weekday(c("2020-05-01", "2020-05-02"), factor=TRUE)
## [1] Thursday Sunday
## Levels: Sunday < Monday < Tuesday < Wednesday < Thursday < Friday < Saturday
dt <- ymd(18100+1:5)
weekday(dt)
## [1] 3 4 5 6 0
Run the code above in your browser using DataLab