如何在R（RStudio环境）中提取日期月日并转为日期类型

看起来你已经用lubridate和dplyr把日期列处理得很到位了，接下来新增MthDD列其实很简单！要注意的是Date类型必须包含年份，所以我们可以选一个固定的闰年（比如2020，能完美覆盖2月29这种特殊日期）来拼接月日信息，再转成标准Date类型。

方法1：延续你的lubridate+dplyr工作流 #

直接在管道操作里新增列就行：

d2 <- d2 %>%
  mutate(
    # 提取原日期的月、日，拼接2020年再转为Date类型
    MthDD = ymd(paste("2020", month(PickUpDate), day(PickUpDate), sep = "-"))
  )

方法2：用format函数简化字符串提取 #

如果觉得分步提取月日有点繁琐，也可以直接用format提取%m-%d格式的字符串：

d2 <- d2 %>%
  mutate(
    MthDD = ymd(paste("2020", format(PickUpDate, "%m-%d"), sep = "-"))
  )

验证结果 #

运行完代码后，用str(d2$MthDD)检查，输出应该类似这样：

Date[1:14258], format: "2020-10-21" "2020-07-15" "2020-07-01" ...

这样MthDD就是标准的Date类型，同时完整保留了原PickUpDate的月份和日期信息。

内容的提问来源于stack exchange，提问作者user3115933