r programming blackjack

error code: 521