date.mdy(sdate, weekday = FALSE)
mdy.date()
,
number of days since 1/1/1960.TRUE
, then the returned list also will
contain the day of the week (Sunday=1, Saturday=7).month
, day
, and year
.day <- 7
temp <- date.mdy(mdy.date(month = 7, day = day, year = 1960))
## Check for illegal dates, such as 29 Feb in a non leap year
if (temp$day != day) {
cat("Some illegal dates
")
} else {
cat("All days are legal
")
}
Run the code above in your browser using DataLab