Discussion Week 6

Chapter 3 Question #20

A six-card hand is dealt from an ordinary deck of cards. Find the probability that:

1. All six cards are hearts.

prob <- choose(13, 6) / choose(52, 6)
prob

## [1] 8.428903e-05

2. There are three aces, two kings, and one queen.

prob2 <- (choose(4, 3) * choose(4, 2) * choose(4, 1)) / choose(52, 6)
prob2

## [1] 4.71547e-06

3. There are three cards of one suit and three of another suit.

prob3 <- (choose(4, 2) * choose(13, 3) * choose(13, 3)) / choose(52, 6)
prob3

## [1] 0.02410666