R语言中列数不固定时，如何实现data.frame的行条件筛选？

核心需求实现（仅基于第1、2、3列筛选） #

直接使用列的位置索引替代硬编码的列名，无论数据框有多少列（只要≥3），都能准确筛选出第2列值大于第1列且小于第3列的行：

# 筛选逻辑：第2列 > 第1列 且 第2列 < 第3列
df_filtered <- df[df[[2]] > df[[1]] & df[[2]] < df[[3]], ]

扩展：全列严格递增的筛选（若需求为每行递增） #

如果实际需求是保留每行从左到右所有列严格递增的行（适配任意列数），可以用apply逐行验证：

# 逐行检查是否所有后列都大于前列
is_strictly_increasing <- apply(df, 1, function(row) all(diff(row) > 0))
# 筛选符合条件的行
df_filtered <- df[is_strictly_increasing, ]

测试示例 #

用动态列数验证核心方案：

seq1 <- seq(0, 1, by = 0.25)
ncol <- 4 # 测试4列的情况
df <- expand.grid(rep(list(seq1), ncol))

# 应用筛选
df_filtered <- df[df[[2]] > df[[1]] & df[[2]] < df[[3]], ]
head(df_filtered)

内容的提问来源于stack exchange，提问作者A.B.