Retrieving the other elements in a list after sampling

Question

I understand that you can sample elements from a list using:

list1 <- list(x, y)

A <- sample(list1, 1)

If \'A\' is x, h