x <- rvec(list(c(3, 5),
c(0, 2)))
dnbinom_rvec(x, size = 6, prob = 0.2)
pnbinom_rvec(x, size = 6, prob = 0.2)
rnbinom_rvec(n = 2,
size = 2,
mu = c(4, 8),
n_draw = 1000)
Run the code above in your browser using DataLab