Generates random variables from a discrete distribution (from a finite population with replacement).
rvdiscrete(n = 1, x, prob = NULL)
integer: number of scalars to generate
values of the distribution
probabilities (optional, default: all equal)
Computes a random vector of length n
, consisting of identicallly
distributed discrete random scalars with the discrete distribution with
values x
and corresponding probabilities prob
. If prob
is not given, all values are considered equally distributed.
Kerman, J. and Gelman, A. (2007). Manipulating and Summarizing Posterior Simulations Using Random Variable Objects. Statistics and Computing 17:3, 235-244.
See also vignette("rv")
.
if (FALSE) {
# 8 people draw a number each from 1..10 with replacement.
# What is the probability that the highest number of the eight is "10"?
u <- rvdiscrete(n=8, x=1:10) # 8 iid variables from the discrete uniform 1:10.
Pr(max(u)==10)
# What is the probability that the person with the 3rd smallest number
# has at least "3"?
s <- sort(u) # order distribution
Pr(s[3]>=3)
}