这个
Date
类描述特定的一天。(顺便说一下,内部代表是
数
从1970年1月1日起的天数)所以,你不能有
日期
没有指定日期。
如果你想保留
日期
当表示特定月份时,可以将
一个月的第一天
:
lubridate::floor_date(as.Date("2019-04-19"), "month")
会回来的
2019-04-01
.
根据OP的数据:
df <- data.frame(Date = as.Date(c("2002-01-24", "2003-02-25", "2004-03-26")))
df$Month <- lubridate::floor_date((df$Date), "month")
df
Date Month
1 2002-01-24 2002-01-01
2 2003-02-25 2003-02-01
3 2004-03-26 2004-03-01
str(df)
'data.frame': 3 obs. of 2 variables:
$ Date : Date, format: "2002-01-24" "2003-02-25" "2004-03-26"
$ Month: Date, format: "2002-01-01" "2003-02-01" "2004-03-01"
这对于绘制月度汇总非常方便。