r - 过滤行最大值大于阈值的行

Question

我有一个数据框，例如:

x <- data.frame("Names"= c("name1","name2","name3"), "A" = c(0.1,0.1,0.8), "B" = c(0.3,0.4,0.3), "C" = c(0.05,0.9,0.05),"D" =c(0.6,0.1,0.3))

> x
  Names   A   B    C   D
1 name1 0.1 0.3 0.05 0.6
2 name2 0.1 0.4 0.90 0.1
3 name3 0.8 0.3 0.05 0.3

我想要的是删除 A 、 B 、 C 或 D 的最大值低于 0.8 的所有行。然后，得到:

> x
  Names   A   B    C   D
2 name2 0.1 0.4 0.90 0.1
3 name3 0.8 0.3 0.05 0.3

名称 1 已被删除，因为 0.6 是最大值。

然后我想获取一个文件，例如我获取带有列名的 NameX，其中该值是最大值，在本例中为:

Name1 : C with value 0.9
Name2 : A with value 0.8 

感谢您的帮助。

Answer 1

您可以使用pmax，即

x[do.call(pmax, x[-1]) >= 0.8,]
#  Names   A   B    C   D
#2 name2 0.1 0.4 0.90 0.1
#3 name3 0.8 0.3 0.05 0.3