I have the following dataset, of which a subset is:
structure(list(Sex = c("Male", "Male", "Female", "Male", "Mal