R语言中如何删除数据库date2列内4月份的日期数据

针对删除date2列对应4月份行的需求，以下是不同场景的实现方案，大规模数据集优先推荐data.table方案，执行效率最高： #

方案1：data.table（超大数据集首选，速度最优） #

# 加载包
library(data.table)
# 转换数据集为data.table格式
setDT(data)

# 方法A：字符串匹配，无需转换日期格式，速度最快，仅要求date2为标准YYYY-MM-DD格式
data <- data[!substr(date2, 6, 7) == "04"]

# 方法B：日期格式匹配，更稳妥，避免格式异常导致的匹配错误
data <- data[!month(as.IDate(date2)) == 4]

方案2：tidyverse（语法易读，中等规模数据适用） #

library(dplyr)
library(lubridate)

# 方法A：字符串匹配
data <- data %>%
  filter(substr(date2, 6, 7) != "04")

# 方法B：日期格式匹配
data <- data %>%
  mutate(date2 = ymd(date2)) %>%
  filter(month(date2) != 4)

方案3：基础R实现（无需加载第三方包） #

# 方法A：字符串匹配
data <- data[substr(data$date2, 6, 7) != "04", ]

# 方法B：日期格式匹配
data$date2 <- as.Date(data$date2)
data <- data[as.POSIXlt(data$date2)$mon + 1 != 4, ]

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