.
r programming blackjack aupf