我有一个棒球选手信息的数据框：
fig,ax = plt.subplots(1)
ax.add_patch(rect) # Add the patch to the Axes
legend_elements = build_legend(color_map)
ax.legend(handles=legend_elements,loc='upper left')
plt.show()
我想返回击球平均值（'AB'）大于100的击球平均值（'平均值'）列的最大值。平均值列中也有'NaN'。
在另一列上有条件的r中找到最大列值
•
问答
gukoule 回答：在另一列上有条件的r中找到最大列值
如果要返回两个条件为TRUE的整行，则可以执行以下操作。
library(tidyverse)
data <- tibble(
AB = sample(seq(50,150,10),avg = c(runif(9),NaN)
)
data %>%
filter(AB >= 100) %>%
filter(avg == max(avg,na.rm = TRUE))
第一个过滤器将仅保留AB大于或等于100的行，第二个过滤器将选择其最大的整个行。如果只想获得最大值，可以执行以下操作：
data %>%
filter(AB >= 100) %>%
summarise(max = max(avg,na.rm = TRUE))