Computes likelihood matrix for many spinners

Computes likelihood matrix for many spinners

spinner_likelihoods(regions)

Arguments

regions	list of vectors of integer areas for the spins 1, 2, ...

Value

A matrix where each row corresponds to the outcome probabilities for one spinner.

Examples

  sp1 <- c(2, 1, 1)
  sp2 <- c(1, 1, 1, 1)
  spinner_likelihoods(list(sp1, sp2))
#>              1    2    3    4
#> Spinner A 0.50 0.25 0.25 0.00
#> Spinner B 0.25 0.25 0.25 0.25