Sys.Date()
{base}
return system date
rnorm()
{stats}
generate random sample from normal distribution
data()
{utils}
load specific data set
library()
load R packages
today()
{lubridate}
return the current date
mean()
calculate mean of elements of vector
as.Date()
convert to date
The end!