Problem with “max” function and dates with R

Question

I have a dataframe with dates and I simply want to know the max date:

dates <- data.frame( randomdate = c("30-11-2018", "25-10-2018", &qu