This grows very large with the number of flips. It will throw an error if you try too many flips.

get_possibilities(nheads, nflips)

Arguments

nheads

Number of heads

nflips

Total number of flips (heads and tails)

Value

data.frame with each potential trial as a row. 1=heads, 0=tails.