Main wrapper function to start MCMCs, particle MCMCs and SMCs

runMCMC(bayesianSetup, sampler = "DEzs", settings = NULL)

Arguments

bayesianSetup

either one of a) an object of class BayesianSetup with prior and likelihood function (recommended, see createBayesianSetup), b) a log posterior or other target function, or c) an object of class BayesianOutput created by runMCMC. The latter allows to continue a previous MCMC run. See details for further details.

sampler

sampling algorithm to be run. Default is DEzs. Options are "Metropolis", "AM", "DR", "DRAM", "DE", "DEzs", "DREAM", "DREAMzs", "SMC". For details see the help of the individual functions.

settings

list with settings for each sampler (see help of sampler for details). If a setting is not provided, defaults (see applySettingsDefault) will be used.

Value

The function returns an object of class mcmcSampler (if one chain is run) or mcmcSamplerList. Both have the superclass bayesianOutput. It is possible to extract the samples as a coda object or matrix with getSample. It is also possible to summarize the posterior as a new prior via createPriorDensity.

Details

The runMCMC function can be started with either one of a) an object of class BayesianSetup with prior and likelihood function (recommended, see createBayesianSetup), b) a log posterior or other target function, or c) an object of class BayesianOutput created by runMCMC. The latter allows to continue a previous MCMC run. If a bayesianSetup is provided, check if appropriate parallization options are used - many samplers can make use of parallelization if this option is activated when the class is created.

For details about the different MCMC samplers, make sure you have read the Vignette (run vignette("BayesianTools", package="BayesianTools"). Also, see Metropolis for Metropolis based samplers, DE and DEzs for standard differential evolution samplers, DREAM and DREAMzs for DREAM sampler, Twalk for the Twalk sampler, and smcSampler for rejection and Sequential Monte Carlo sampling.

The samplers "AM", "DR", and "DRAM" are special cases of the "Metropolis" sampler and are shortcuts for predefined settings ("AM": adapt=TRUE; "DR": DRlevels=2; "DRAM": adapt=True, DRlevels=2).

The settings list allows to change the settings for the MCMC samplers and some other options. For the MCMC sampler settings, see their help files. Global options that apply for all MCMC samplers are: iterations (number of MCMC iterations), and nrChains (number of chains to run). Note that running several chains is not done in parallel, so if time is an issue it will be better to run the MCMCs individually and then combine them via createMcmcSamplerList into one joint object.

Startvalues: all samplers allow to provide explicit startvalues. If startvalues are not provided, they are sampled from the prior. Usually, this is a good choice, so don't feel compelled to provide startvalues.

Note that DE and DREAM variants as well as SMC and T-walk require a population to start, which should be provided as a matrix. Default (NULL) sets the population size for DE to 3 x dimensions of parameters, for DREAM to 2 x dimensions of parameters and for DEzs and DREAMzs to three, sampled from the prior. Note also that the zs variants of DE and DREAM require two populations, the current population and the z matrix (a kind of memory) - if you want to set both, provide a list with startvalue$X and startvalue$Z.

Startvalues for sampling with nrChains > 1 : if you want to provide different start values for the different chains, provide them as a list

See also

createBayesianSetup

Examples

## Generate a test likelihood function. ll <- generateTestDensityMultiNormal(sigma = "no correlation") ## Create a BayesianSetup object from the likelihood ## is the recommended way of using the runMCMC() function. bayesianSetup <- createBayesianSetup(likelihood = ll, lower = rep(-10, 3), upper = rep(10, 3)) ## Finally we can run the sampler and have a look settings = list(iterations = 1000, adapt = FALSE) out <- runMCMC(bayesianSetup = bayesianSetup, sampler = "Metropolis", settings = settings)
#> BT runMCMC: trying to find optimal start and covariance values 
#> BT runMCMC: Optimization finished, setting startValues to -0.000513299136522025 -0.000743879714863449 -7.70756466722203e-05 - Setting covariance to 1.00003520841839 -1.97432442907153e-05 -0.000207894322479918 -1.97432442907153e-05 1.0000232934351 -0.000143450503304748 -0.000207894322479918 -0.000143450503304748 1.00146835650731
#> Running Metropolis-MCMC, chain 1 iteration 100 of 1000 . Current logp: -12.95988 Please wait! Running Metropolis-MCMC, chain 1 iteration 200 of 1000 . Current logp: -13.51121 Please wait! Running Metropolis-MCMC, chain 1 iteration 300 of 1000 . Current logp: -13.21691 Please wait! Running Metropolis-MCMC, chain 1 iteration 400 of 1000 . Current logp: -18.70323 Please wait! Running Metropolis-MCMC, chain 1 iteration 500 of 1000 . Current logp: -12.16547 Please wait! Running Metropolis-MCMC, chain 1 iteration 600 of 1000 . Current logp: -13.34294 Please wait! Running Metropolis-MCMC, chain 1 iteration 700 of 1000 . Current logp: -11.93483 Please wait! Running Metropolis-MCMC, chain 1 iteration 800 of 1000 . Current logp: -12.19979 Please wait! Running Metropolis-MCMC, chain 1 iteration 900 of 1000 . Current logp: -12.35007 Please wait! Running Metropolis-MCMC, chain 1 iteration 1000 of 1000 . Current logp: -13.35738 Please wait!
#> runMCMC terminated after 0.730000000000018seconds
## out is of class bayesianOutput. There are various standard functions # implemented for this output plot(out)
summary(out)
#> # # # # # # # # # # # # # # # # # # # # # # # # # #> ## MCMC chain summary ## #> # # # # # # # # # # # # # # # # # # # # # # # # # #> #> # MCMC sampler: Metropolis #> # Nr. Chains: 1 #> # Iterations per chain: 1000 #> # Rejection rate: 0.655 #> # Effective sample size: 122 #> # Runtime: 0.73 sec. #> #> # Parameters #> MAP 2.5% median 97.5% #> par 1 -0.001 -2.038 0.023 2.332 #> par 2 -0.001 -1.966 0.003 1.948 #> par 3 0.000 -1.826 0.146 2.202 #> #> ## DIC: 12.082 #> ## Convergence #> Gelman Rubin multivariate psrf: Only one chain; convergence cannot be determined! #> #> ## Correlations #> par 1 par 2 par 3 #> par 1 1.000 0.039 0.041 #> par 2 0.039 1.000 -0.044 #> par 3 0.041 -0.044 1.000
## additionally, you can return the sample as a coda object, and make use of the coda functions # for plotting and analysis codaObject = getSample(out, start = 500, coda = TRUE)