I am trying to create pen-pal pairs in R. The problem is that I can\'t figure out how to loop it so that once I pair one person that person and their pair are eliminated fro