R语言如何按非标准格式日期过滤data.frame的指定行？

原代码失效的核心原因 #

你写的代码存在两个关键错误：

• 右侧判断值01/09/2021没有转成日期类型，也没有用引号包裹，R会将其识别为算术表达式1 ÷ 9 ÷ 2021，得到的极小数值和日期对象完全无法匹配
• 解析%d%m%Y格式的日期字符串时没有显式指定format参数，R默认按%Y-%m-%d规则解析，会生成大量NA值，导致筛选逻辑失效

正确实现方案 #

Base R版本 #

无需提前格式化日期列，直接解析原始date列的日期部分做判断即可：

# 先定义要排除的目标日期，显式指定格式
exclude_date <- as.Date("01/09/2021", format = "%d/%m/%Y")
# 提取每行日期部分后做筛选
Data <- Data[as.Date(Data$date, format = "%d%m%Y %H:%M") != exclude_date, ]

Tidyverse版本（更易读） #

搭配lubridate处理日期逻辑更简洁：

library(dplyr)
library(lubridate)

Data <- Data %>%
  # dmy() 直接解析日月年格式的日期字符串
  filter(date(date, format = "%d%m%Y %H:%M") != dmy("01/09/2021"))

扩展：删除多个指定日期 #

如果需要同时排除多天的数据，用%in%运算符实现批量判断：

# 示例：排除2021年9月1日、2日两天的数据
exclude_dates <- as.Date(c("01/09/2021", "02/09/2021"), format = "%d/%m/%Y")
Data <- Data[!as.Date(Data$date, format = "%d%m%Y %H:%M") %in% exclude_dates, ]

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