data = c(79.5, 68.4, 74.0, 59.2, 74.0, 64.8, 64.8, 59.2, 79.5, 62.9,
59.2, 68.2, 64.8, 88.8, 88.8, 75.8, 68.4, 68.4, 61.0, 51.8,
62.9, 64.8, 61.0, 61.0, 70.3, 68.4, 55.5, 64.8, 77.7, 57.3,
48.1, 53.6, 55.5, 62.9, 61.0, 61.0, 51.8, 48.1)
gumbel.mle(data)
Run the code above in your browser using DataLab