x <- Sys.Date()
Year(x)
Quarter(x)
Month(x)
Month(x, format="full")
Week(x)
Day(x)
Day(x) <- 20
x
Weekday(x, format="abbr")
Yearday(x)
# let's generate a time sequence by weeks
Month(seq(from=as.Date(Sys.Date()), to=Sys.Date()+150, by="weeks"), format="a")
Run the code above in your browser using DataLab