random sample for from dataset with multiple appointment per patient

I have a dataset with multiple appointments per patient, I need to generate a dataset with only single appointment per patient. In my dataset I have 50000 appointments and only 32400 patients. Any idea what code to use in R ??