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] "4C 3C AH 7S 5H"
eval_hand(hand)
#> [1] "high_card"