R如何提取dataframe指定列前3个最大值？索引返回列错位如何解决？

• 索引逻辑错误：R中数据框/tibble使用df[数值]单参数索引时，默认按列序号提取内容。which.max()返回的是目标列最大值对应的行序号，你直接将行序号作为列索引传入，自然返回了其他列的全部内容，和你遇到的错位现象完全匹配。
• 数据类型错误：你需要计算最大值的列均为字符类型，包含NIL、多值拼接（如17, 21）等非纯数值内容，which.max尝试强制转换为数值时会生成NA，触发警告，也无法正确计算最大值。

第一步：清理目标列，转换为数值类型 #

先将需要计算的列处理为合法数值格式，示例代码如下：

# 若未安装dplyr先运行：install.packages("dplyr")
library(dplyr)

Smart_Water_Bottle_Review <- Smart_Water_Bottle_Review %>%
  # 处理评分数量列：移除千分位逗号后转数值
  mutate(`no. of ratings` = as.numeric(gsub(",", "", `no. of ratings`)),
         # 处理容量列：移除空格后按逗号分割取第一个值转数值，有多值需求可自行调整逻辑
         `volumne (oz)` = as.numeric(sapply(strsplit(gsub(" ", "", `volumne (oz)`), ","), function(x) x[1])),
         # 处理保温时长列：将NIL替换为NA后转数值
         `keep hot (hrs)` = as.numeric(ifelse(`keep hot (hrs)` == "NIL", NA, `keep hot (hrs)`)))

第二步：正确提取最大值/前3大值 #

提取单列最大值 #

# 提取no. of ratings列的最大值数值
max_rating <- max(Smart_Water_Bottle_Review$`no. of ratings`, na.rm = TRUE)

# 提取no. of ratings列最大值对应的整行数据（注意索引加逗号，[行, 列]）
max_rating_row <- Smart_Water_Bottle_Review[which.max(Smart_Water_Bottle_Review$`no. of ratings`), ]

提取单列前3大值 #

# 取前3大数值（去重版本）
top3_rating_values <- head(sort(unique(Smart_Water_Bottle_Review$`no. of ratings`), decreasing = TRUE), 3)

# 取前3大数值对应的整行数据
top3_rating_rows <- Smart_Water_Bottle_Review %>%
  arrange(desc(`no. of ratings`)) %>%
  slice(1:3)

如果需要处理其他列，把代码中的列名替换为volumne (oz)、keep hot (hrs)即可。

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