如何在R语言中筛选数据框内最近6个月的有效数据

你已加载lubridate包，可直接通过该包的时间运算函数完成筛选，默认以数据集内的最新日期为基准计算最近6个月，如需调整基准可参考备注修改。

方法1：Base R 实现 #

# 计算筛选阈值：数据集最新日期往前推6个月，%m-%为安全月份减法，避免月末日期计算异常
cutoff_date <- max(game_data$date_) %m-% months(6)
# 子集筛选
game_last6m <- game_data[game_data$date_ >= cutoff_date, ]

方法2：dplyr 管道写法（更简洁） #

library(dplyr)
game_last6m <- game_data %>%
  filter(date_ >= max(date_) %m-% months(6))

注意事项 #

• 若你需要以当前系统日期为基准计算最近6个月，将阈值替换为cutoff_date <- today() %m-% months(6)即可，注意你提供的示例数据集最新日期为2021-03-31，使用当前系统日期筛选会得到空集，需适配你的实际业务场景。
• 必须使用%m-%做月份减法，避免出现如3月31日减1个月得到无效日期的问题。

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