hyper2 objectsrhyper2.RdRandom hyper2 loglikelihood functions, intended as quick
“get you going” examples
rhyper2(n = 8, s = 5, pairs = TRUE, teams = TRUE, race = TRUE, pnames)Function rhyper2() returns a likelihood function based on
random observations. To return a random probability vector drawn from
a from a given (normalized) likelihood function, use rp().
rhyper2()
#> log(a^6 * (a + b + c + d + e + f + g + h)^-10 * (a + b + c + d + e + f
#> + h)^-1 * (a + b + c + d + e + g + h)^-2 * (a + b + c + e + f + h)^-1 *
#> (a + b + d + e + f + g + h)^-1 * (a + b + d + e + g + h)^-1 * (a + b +
#> d + e + h)^-1 * (a + b + e + f + g)^-1 * (a + b + e + f + g + h)^-1 *
#> (a + c)^-1 * (a + d + e + h)^-1 * (a + e)^-1 * (a + e + f + h) * (a + f
#> + g + h) * (a + g)^-1 * b^6 * (b + c)^-1 * (b + c + d + e + f + g +
#> h)^-1 * (b + c + d + e + g + h)^-1 * (b + c + e + f + h)^-1 * (b + c +
#> g + h) * (b + d + e + f + g + h)^-1 * (b + d + f + h) * (b + e + f +
#> g)^-1 * (b + e + f + g + h)^-1 * (b + e + g + h)^-1 * (b + f + g)^-1 *
#> (b + g)^-1 * (b + g + h)^-1 * c^6 * (c + d + e + g + h)^-1 * (c + e + f
#> + h)^-1 * (c + f + g + h) * d^5 * (d + e + g + h)^-1 * (d + e + h)^-1 *
#> e^4 * (e + f)^-1 * (e + f + h)^-1 * (e + g + h)^-1 * (e + h)^-2 * f^4 *
#> (f + g)^-1 * g^6 * (g + h)^-1 * h^3)
rp(2,icons)
#> NB L PB THC OA WAIS
#> [1,] 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667
#> [2,] 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667 0.1666667