Normal(mu = 0, sigma = 1)
Normal(mu = -5:5, sigma = c(0.1, 1))
LKJ(eta = 2)
u <- matrix(rnorm(9L), 3L, 3L)
utu <- crossprod(u)
uut <- tcrossprod(u)
Wishart(df = 6, scale = utu)
InverseWishart(df = 6, scale = list(utu, uut))
Run the code above in your browser using DataLab