I have the following dataset of which a subset is:
structure(list(First.Name = c(5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 5006L, 500