powered by
This function returns the weekday of a given date according to MMWR.
MMWRweekday(date)
vector which can be coerced to class Date
Date
vector of weekdays as a factor (first level is Sunday)
MMWRweek
# NOT RUN { y <- as.Date(paste(1999:2011, "-12-31", sep = "")) data.frame(date = format(y), MMWRweekday = MMWRweekday(y)) # }
Run the code above in your browser using DataLab