Preciso obter o máximo de uma variável em uma lista aninhada. Para um determinado número de estação "s" e um determinado membro "m",mylist[[s]][[m]] têm a forma:

station date.time        member  bias
6019    2011-08-06 12:00 mbr003  86
6019    2011-08-06 13:00 mbr003  34

Para cada estação, preciso obter o máximo debias de todos os membros. Paras = 3, Consegui fazê-lo através de:

library(plyr)
var1 <- mylist[[3]]
var2 <- lapply(var1, `[`, 4)
var3 <- laply(var2, .fun = max)
max.value <- max(var3)

Existe uma maneira de evitar o número da coluna "4" na segunda linha e usar o nome da variável$bias dentrolapply ou uma maneira melhor de fazer isso?