リストとlapply内のリスト

Question

私は10個の要素からなるリストを持っています。これらはそれぞれ2つの要素からなるリストです。これは）（私はSTRと得るものの一部です：

> str(results) 
List of 10 
$ :List of 2 

私は、各リストの2番目の要素によって形成されたベクトルに機能分を適用したいが、私はそれを行う方法の見当がつかないネストされたリストで

例

results <- list(list(1, 2), list(3, 4), list(5, 6), list(4, 1), list(5, 1), 
       list(5, 1), list(-1, 10), list(6, 0), list(0, 9), list(4, 4)) 

Answer 1

これは役立つかもしれない：

min(sapply(results, `[[`, 2)) 

または同等：

min(sapply(results, function(x) { x[[2]] }))