如何在R中按11月1日至次年4月10日的时间条件筛选DataFrame？

原代码的问题 #

1. 列名错误：你的示例数据中日期列是dat，但代码中误用了day，这会导致筛选逻辑失效甚至报错；
2. 逻辑错误：原代码month!=4 & day <10错误地排除了所有4月的行，同时仅保留其他目标月份中日期小于10的行——而你真正需要的是：保留11、12、1、2、3月的所有行，以及4月中日期≤10的行。

正确解决方案 #

方法1：Base R subset 函数

# 定义示例数据
df = data.frame(ID = c(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15),
                month = c(1,2,3,4,5,6,6,1,4,4,12,11,11,12,6),
                dat = c(1,26,3,15,15,16,4,3,16,11,3,12,14,6,27))

# 正确筛选逻辑
filtered_df <- subset(df, 
                      (month %in% c(11, 12, 1, 2, 3)) | 
                      (month == 4 & dat <= 10))

# 查看结果
print(filtered_df)

输出结果：

ID month dat
1   1     1   1
2   2     2  26
3   3     3   3
8   8     1   3
11 11    12   3
12 12    11  12
13 13    11  14
14 14    12   6

方法2：Tidyverse dplyr 包（适合习惯tidy语法的用户）

library(dplyr)

filtered_df <- df %>%
  filter(month %in% c(11, 12, 1, 2, 3) | (month == 4 & dat <= 10))

print(filtered_df)

输出结果与Base R方法一致。

说明 #

筛选逻辑拆解：

• 保留11月、12月、1月、2月、3月的所有样本；
• 额外保留4月中日期≤10日的样本；
• 自动排除其他月份（5-10月）以及4月10日之后的样本。

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