powered by
data(hudsonia)
data(hudsonia) lapply(hudsonia, function(x){Re(eigen(x)$values[1])})
Run the code above in your browser using DataLab