Randomly separate one column into two groups based on ID in R

Question

I have a data frame that looks like this. For each ID, I want to randomly assign subjects into two groups with relatively equal subjects, and I also want to add a new column