卡的分配（R中的模拟）

Question

This is a vector of cards:

Cards
 [1]  2  3  4  5  6  7  8  9 10 11 12 13 14  2  3  4  5  6  7  8  9 10 11 12 13 14  2  3  4  5  6  7  8  9
[35] 10 11 12 13 14  2  3  4  5  6  7  8  9 10 11 12 13 14

1:14 - cards values:

I want to distribute this cards among 2 players: 26 cards for both of them.

hand_1 <- sample(cards,size = length(cards)/2)

this is a hand for player 1.

How can I get the hand for player 2 correctly? I need somehow delete all elements from cards , that exist in hand_1 . How can i do this without using loop technique.

Answer 1

You can simply:

matrix(sample(cards),ncol=2,dimnames=list(NULL,c("hand1","hand2")))

so you get a matrix whose columns are the two hands.