如何在R语言中删除某列数值最高的前3行？

你的方法确实能实现需求，但确实存在更简洁、高效的替代方案——不用先对整个DataFrame排序，直接定位要删除的行索引即可，尤其处理大数据集时优势更明显。

方案1：基础R原生实现 #

直接通过order()获取Coal列降序排列后的前3个行索引，然后删除这些行：

# 获取Coal列前3高值的行索引
top3_rows <- order(energyData$Coal, decreasing = TRUE)[1:3]
# 删除对应行
energyDataRed <- energyData[-top3_rows, ]

这种方式只计算索引，不需要生成排序后的完整中间DataFrame，内存和时间效率更高。

方案2：dplyr包简洁实现 #

如果习惯用tidyverse生态，用dplyr的slice()结合索引定位，代码更紧凑：

library(dplyr)
energyDataRed <- energyData %>% slice(-order(-Coal)[1:3])

或者用top_n()配合反选逻辑，可读性更强：

energyDataRed <- energyData %>% anti_join(top_n(., 3, Coal), by = names(.))

补充：你的原代码小细节 #

注意你原代码里写的是energyDataRed[-1:-2, ]，这只删除了前2行，和你需求的“删除前3行”不符，应该改成-1:-3。

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