View source: R/ESliceSampling.R
Infectious rate and recovery rate: theta1, theta2 Scale parameter: lambda
1 2 | SIR_LNA_ESlice_MCMC2(state, Init, times, t_correct, gridsize = 50,
niter = 1000, burn = 500, thin = 5)
|
prior s1: s1 = theta1 log(1/s1) ~ gamma(50,5) propose function random walk Uniform[-0.5,0.5] on log space
s2: theta2/theta1 proposal function: random walk Uniform[-0.5,0.5] Normal(20000,2000)
lambda log(lambda) ~ gamma(16,4) propose random walk uniform [-0.5,0.5] on logspace
log(p1/p3) ~ gamma(60,10) log(p2/p3) ~ gamma(60,20)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.