- Thread starter Actree
- Start date

Please read this. Thanks.

Let's get to work: My response would be to find all possible hands that don't meet your requirement. Seems easier.

So we could either have no blues in our hand. We could have no reds in our hands. But both of these include the possibility of having none of either in the hand so we'll have to subtract that out once when we're done.

My code in R:

Code:

```
> 1-((choose(56,7)*2-choose(52,7))/choose(60,7))
[1] 0.1454057
```

Code:

```
containsRed <- function(x){
tst <- x %in% 1:4
return(sum(tst)>0)
}
containsBlack <- function(x){
tst <- x %in% 5:8
return(sum(tst)>0)
}
wanted <- function(x){
ans <- containsRed(x) & containsBlack(x)
return(ans)
}
mean(replicate(100000,wanted(sample(1:60,7))))
```

Code:

```
> mean(replicate(100000,wanted(sample(1:60,7))))
[1] 0.14597
```