r programming blackjack rbar

error code: 521