How many times should an 11 sided biased coin be thown, so each of the unbiased sides occured atleast a 100 times If I have an 11 sided coin where p(1) up to p(10) has probability 0.01. And p(11) has probability 0.9.
How do I calculate after how many throws p(1) up to p(10) each occurred at least a 100 times.
Also how do I create a binominal distribution of this, to determine the minimum and maximum 95 or 99% amount?
I am seeking for a general formula to determine this, it is assumed that p(1)-p(n) of the unbiased side all have the same probability though.
 A: You could approximate the problem by each side being independent and then the probability for all ten sides being above 100 is the probability for one side being above 100 to the power ten.
Below is a code example that compares this approximation with a simulation.

d = 100 ### cutoff-level
m = 20  ### number of bins/dice-sides
n = 5000 ### number of trials for histogram

### fucntion that repeats sampling untill all states are above d
sim <- function() {
  states = c(rep(FALSE,m),TRUE)
  cases = rep(0,m+1)
  count = 0
  while (prod(states) == 0) {
    count = count + 1
    s = sample(c(1:(m+1)), 
               size = 1, 
               prob = c(rep(0.1/m,m),0.9))
    cases[s] = cases[s] + 1
    if (cases[s] == d) {
      states[s] = TRUE
    }
  }
  return(count)
}

### do the simulation n times
set.seed(1)
sims <- replicate(n,sim())

### plot and compute histogram
h <- hist(sims, freq = 1, main = "histogram of simulation with curve of approximation",
     breaks = seq(20000,30000,400))

### compute approximate counts distribution function
ns = 1:max(h$breaks)
psingle <- 1-pbinom(d-1,ns,p=0.1/m)
pmult <- psingle^m

### add to historgram
counts = sapply( 1:length(h$mids), FUN = function(x) {
  pmult[h$breaks[x+1]]-pmult[h$breaks[x]]
})
lines(h$mids,counts*n)
points(h$mids,counts*n, pch = 21, col = 1, bg = 0)

