What is the best way of Under sampling in R

I have a dataset with attribute A,B, C. C has 2 labels x and y. number of (x) > number of (y), I want to under sample my data set so that in the new data has same no of x and y values