如何删除指定列范围中NA占比超25%的行，无需逐个指定列名

原代码报错原因 #

你提交的代码存在两个核心逻辑错误：

• data$ColumnA:data$ColumnZ写法无法正确选取从ColumnA到ColumnZ的列范围，R会将该语句识别为两个列向量的序列运算，而非取连续列子集
• 你需要先计算每行中目标列的NA占比再做筛选，原代码的判断逻辑完全不匹配需求
  同时drop_na()函数的作用是直接删除包含任意NA的行，不符合允许25%以内NA存在的需求，因此无法直接使用。

解决方案1：tidyverse（dplyr）实现（写法最简洁） #

直接用ColumnA:ColumnZ语法选取连续列，配合行均值计算NA占比：

library(dplyr)

result <- data %>%
  # 仅保留目标列NA占比≤25%的行
  filter(rowMeans(is.na(across(ColumnA:ColumnZ))) <= 0.25)

解决方案2：base R实现（无需加载第三方包） #

先定位目标列的起止位置，再逐行计算NA占比筛选：

# 定位目标列的索引位置
col_start <- which(colnames(data) == "ColumnA")
col_end <- which(colnames(data) == "ColumnZ")
# 计算每行目标列的NA占比
na_ratio <- rowMeans(is.na(data[, col_start:col_end]))
# 筛选符合要求的行
result <- data[na_ratio <= 0.25, ]

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