# NOT RUN {
# Create bayesian setup with
bayesianSetup <- createBayesianSetup(likelihood = testDensityNormal,
prior = createUniformPrior(lower = -10,
upper = 10))
# running MCMC
out = runMCMC(bayesianSetup = bayesianSetup)
# diagnostic plots
# }
# NOT RUN {
plotDiagnostic(out)
# }
Run the code above in your browser using DataLab