提取日期中的各个组成部分信息
>d <- Sys.time()
> p<-as.POSIXlt(d)
> p
[1] "2016-08-11 18:14:53 CST"
> class(p)
[1] "POSIXlt" "POSIXt"
> print(mode(p))
[1] "list"
> print(p$year+1900) # p$year 自1900年以来的年份
[1] 2016
> print(p$mon)
[1] 7
> print(p$mon+1) # p$mon 表示0-11月
[1] 8
> print(p$mday) # p$mday 该月的第几天
[1] 11
> print(p$yday+1) # p$yday 该年的第几天,0-365天,元旦当天是第0天
[1] 224
> print(p$wday) # p$wday 对应周几,0-6,周日为0,其他时间和我们日常习惯一致
[1] 4


雷达卡



京公网安备 11010802022788号







