当前日期:
>Sys.Date()
[1] "2018-11-10"
当前时间:
> date()
[1] "Sat Nov 10 09:11:35 2018"
日期值的默认输入格式,将字符串数据转换为对应日期 yyyy-mm-dd:
> mydates<-as.Date(c("2007-06-22","2004-02-13"))
> mydates
[1] "2007-06-22" "2004-02-13"
从日期读取数据 mm/dd/yyyy:
> strDates<-c("01/05/1965","08/16/1975")
> strDates
> dates<-as.Date(strDates,"%m/%d/%Y")
> dates
[1] "1965-01-05" "1975-08-16"
输出指定格式的日期值:
> format(today,format="%B %d %Y")
[1] "十一月 10 2018"
> format(today,format="%d %B %Y")
[1] "10 十一月 2018"
对日期值执行算术运算:
> startdate<-as.Date("2004-2-13")
> enddate<-as.Date("2011-01-22")
> startdate
[1] "2004-02-13"
> enddate
[1] "2011-01-22"
> days<-enddate-startdate
> days
Time difference of 2535 days
使用函数difftime()来计算时间间隔:
> difftime(today,birthday,units="weeks")
Time difference of 1363 weeks
> difftime(today,birthday,units="days")
Time difference of 9541 days
将日期转换为字符型变量:
> strDates<-as.character(today)
> strDates
[1] "2018-11-10"
(进行转换后,即可使用一系列字符处理函数处理数据(如取子集、替换、连接等))
扫描二维码关注公众号,回复:
4008119 查看本文章
相关:fCalendar包