x <- rvec(list(c(3, 5.1),
c(0.1, 2.3)))
dgamma_rvec(x, shape = 1)
pgamma_rvec(x, shape = 1)
rgamma_rvec(n = 2,
shape = 1,
rate = c(0.5, 1),
n_draw = 1000)
Run the code above in your browser using DataLab