Nothing
bayesianSetup = createBayesianSetup(
likelihood = generateTestDensityMultiNormal(sigma = "no correlation"),
lower = rep(-10, 3), upper = rep(10, 3))
out <- runMCMC(bayesianSetup = bayesianSetup, sampler = "Metropolis",
settings = list(iterations = 2000, message = FALSE))
getVolume(out, prior = TRUE)
bayesianSetup = createBayesianSetup(
likelihood = generateTestDensityMultiNormal(sigma = "strongcorrelation"),
lower = rep(-10, 3), upper = rep(10, 3))
out <- runMCMC(bayesianSetup = bayesianSetup, sampler = "Metropolis",
settings = list(iterations = 2000, message = FALSE))
getVolume(out, prior = TRUE)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.