2016-04-19 5 views

答えて

0

ので、私は名前の要素を、このようなものでものはベクトル(またはリスト)のリストでなければならないとします

stuff <- list(first = c(bang=1, qux = 2, foo = 3), 
       second = c(bang=6, qux = 0, foo= 100), 
       third = c(bang = 1, qux = 7, foo = 0)) 

あなたがsapplyを使用して要素「foo」を得ることができます:

sapply(stuff, function(.) .['foo']) 

...それの最大見つける:

which.max(sapply(stuff, function(.) .['foo'])) 

を...そしてインデックスあなたのリストにそれを使用します。

stuff[which.max(sapply(stuff, function(.) .['foo']))] 

またはmagrittrと:

stuff %>% {.[sapply(., "[", "foo") %>% which.max]} 
+0

....私は腹筋を忘れてしまった..あなたが同様にこれを追加する必要があります – lebatsnok

関連する問題