如何提取季节,月份,使用lubridate
包
年份: year(datae)
月份: month(datae)
日期: day(datae)
季节: quarter(datae)
代码
library(lubridate)
d<-c("2012-1-10","2013-5-9","2014-6-25")
year(d)
month(d)
day(d)
quarter(d)
结果
> library(lubridate)
> d<-c("2012-1-10","2013-5-9","2014-6-25")
> year(d)
[1] 2012 2013 2014
> month(d)
[1] 1 5 6
> day(d)
[1] 10 9 25
> quarter(d)
[1] 1 2 2