Evaluate a poker hand

Evaluate the rank category of a five card poker hand.

Usage

eval_hand(hand)

Arguments

hand

a hand of cards.

Value

string hand rank

Examples

hand <- deal_hand(new_deck())
print_hand(hand)
#> [1] "2D QH AH 3C 7C"
eval_hand(hand)
#> [1] "high_card"