# NOT RUN {
head(cards)
head(tarot)
head(roulette)
# drawing 5 cards
sample(cards$card, 5)
# spin the wheel by using the DescTools::Sample() for sampling
# rows from a data frame
Sample(roulette, size=1)
# simulate the evening in Las Vegas with 10 games
Sample(roulette, 10, replace=TRUE)
# }
Run the code above in your browser using DataLab