# NOT RUN {
#### example 1
scode <- "
parameters {
real y[2];
}
model {
y[1] ~ normal(0, .5);
y[2] ~ double_exponential(0, 2);
}
"
fit1 <- stanWplot(iter = 100000,chains=2,cores=1, model_code = scode)
# }
Run the code above in your browser using DataLab