test for two pairs

test for two pairs

two_pairs(x)

Arguments

x

a vector of cards

Examples

d = build_deck()
h1 = c(d[1], d[14], d[27], d[2], d[15])
h1
#> [1] "2 ♡" "2 ♢" "2 ♣" "3 ♡" "3 ♢"
two_pairs(h1)
#> [1] FALSE