|
@@ -157,8 +157,8 @@ model {
|
|
|
omega[i,:] ~ pareto(1, 2);
|
|
|
|
|
|
for (j in 1:n_classes) {
|
|
|
- mus[i,j] ~ exponential(1);
|
|
|
- alphas[i,j] ~ lognormal(0, 1);
|
|
|
+ mus[i,j] ~ exponential(2);
|
|
|
+ alphas[i,j] ~ inv_gamma(1, 1);
|
|
|
for (c in 1:n_groups) {
|
|
|
lambda[c,i,j] ~ gamma(alphas[i,j], alphas[i,j]/mus[i,j]);
|
|
|
}
|