R语言 日期

当前日期：

>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包