r - 使用 dplyr 添加基于最大行值的新列？

Question

我有一个大型数据库，其中包含一系列带有数字的列。我想使用 dplyr 添加一个新列 mutate，它的值是具有最大值的列的名称。所以，对于下面的例子

set.seed(123)
data_frame(
  bob = rnorm(10),
  sam = rnorm(10),
  dick = rnorm(10)
    )
# A tibble: 5 x 3
      bob    sam   dick
    <dbl>  <dbl>  <dbl>
1 -0.560   1.72   1.22 
2 -0.230   0.461  0.360
3  1.56   -1.27   0.401
4  0.0705 -0.687  0.111
5  0.129  -0.446 -0.556

新列将等于 c('sam', 'sam', 'bob', 'dick', 'bob') 因为它们具有数据集中列的最大值。有什么想法吗？

Answer 1

这会很好地工作:

df$result = names(df)[apply(df, 1, which.max)]