r programming blackjack qesc

error code: 521