Stata's bayesmh provides a variety of built-in Bayesian models for you to choose from; see the full list of available likelihood models and prior distributions. Cannot find the model you need? bayesmh also provides facilities for you to program your own Bayesian models.
Adding Bayesian models is easy. Simply write a Stata program that computes a posterior density following bayesmh's convention and specify the name of the program with the command. bayesmh will do the rest: it will simulate the marginal posterior distributions for all parameters and provide posterior summaries. After the simulation, your subsequent analyses are exactly the same as if you used one of the built-in models.
You can write a program that computes the overall log likelihood and choose priors from a list of built-in prior distributions or you can write a program that computes the entire log posterior.
As a simple example, let's write a program that computes a log likelihood for a logistic regression model.
. sysuse auto
(1978 automobile data)
program logitll
version 18
args lnf xb
// compute log likelihood
tempvar lnfj
quietly generate double `lnfj' = ln(invlogit( `xb'))
if $MH_y == 1 & $MH_touse
quietly replace `lnfj' = ln(invlogit(-`xb')) if $MH_y == 0 & $MH_touse
quietly summarize `lnfj', meanonly
scalar `lnf' = r(sum)
if r(N) < $MH_n {
scalar `lnf' = .
exit
}
end
We called our program logitll. The program has two arguments: a temporary scalar lnf for storing a value of the overall likelihood and a temporary variable xb that contains the linear predictor evaluated at the current values of parameters. The parameters are regression coefficients in our example.
Global macro MH_y contains the name of the binary dependent variable, MH_touse identifies the estimation sample, and MH_n contains the total number of observations.
We created an intermediate temporary variable lnfj to contain the observation-specific log likelihood. The sum of this variable is the overall log likelihood, which we stored in lnf. If the log-likelihood computation evaluates to missing in at least one observation, the overall likelihood lnf is set to missing.
We can now use our program with bayesmh to fit a Bayesian logistic regression model.
Suppose that we want to model whether a car is foreign or domestic as a function of car mileage. We specify the name of our log-likelihood evaluator in option llevaluator() and specify one of the built-in priors in option prior(). We use the flat prior for both coefficients, mpg and _cons.
. bayesmh foreign mpg, llevaluator(logitll) prior({foreign:}, flat)
rseed(12345)
Burn-in ...
Simulation ...
Model summary
| Likelihood: foreign ~ logitll(xb_foreign) Prior: {foreign:mpg _cons} ~ 1 (flat) (1) |
| Equal-tailed | ||
| foreign | Mean Std. dev. MCSE Median [95% cred. interval] | |
| mpg | .1694426 .056152 .001865 .1684498 .0644589 .2865277 | |
| _cons | -4.604192 1.287691 .043225 -4.590255 -7.330972 -2.11855 | |
The output is almost identical to that produced for built-in models. The only differences are in the title and model summary. The generic 'Bayesian regression' title is used, which can be changed via option title(). The model summary displays the name of the program used to compute the likelihood of this model. The results are the same as the ones that would have been obtained using the built-in likelihood(logit) model (given the same random-number seed and initial values).
We can choose a different built-in prior, for example, a normal prior with zero mean and variance of 25, again for both coefficients.
. bayesmh foreign mpg, llevaluator(logitll) prior({foreign:}, normal(0,25))
rseed(12345)
Burn-in ...
Simulation ...
Model summary
| Likelihood: foreign ~ logitll(xb_foreign) Prior: {foreign:mpg _cons} ~ normal(0,25) (1) |
| Equal-tailed | ||
| foreign | Mean Std. dev. MCSE Median [95% cred. interval] | |
| mpg | .1582694 .0521761 .001671 .1562921 .0653649 .2642418 | |
| _cons | -4.338317 1.188011 .038196 -4.279862 -6.778805 -2.230852 | |
What if you need to use a prior that is not supported? For simple prior distributions, you can specify the expression for the prior density or log density in the corresponding prior()'s suboptions density() and logdensity(). For other prior distributions, you can incorporate them directly into the computation of the posterior density; see Log-posterior evaluators.
In Log-likelihood evaluators, we created the logitll program to compute the log likelihood for a logistic model. Under the flat prior, a prior with the density of 1, the log posterior equals the log likelihood. So, assuming the flat prior, we can use our log-likelihood evaluator as the log-posterior evaluator as well.
We specify the name of the log-posterior evaluator in option evaluator(). We do not specify the prior() option, because the prior information is already incorporated in the computation of the log-posterior density.
. bayesmh foreign mpg, evaluator(logitll) rseed(12345) Burn-in ... Simulation ... Model summary
| Posterior: foreign ~ logitll(xb_foreign) |
| Equal-tailed | ||
| foreign | Mean Std. dev. MCSE Median [95% cred. interval] | |
| mpg | .1694426 .056152 .001865 .1684498 .0644589 .2865277 | |
| _cons | -4.604192 1.287691 .043225 -4.590255 -7.330972 -2.11855 | |
As expected, we obtain results identical to the log-likelihood evaluator with the flat prior (given the same radnom-number seed).
As a demonstration, let's now write a log-posterior evaluator for the normal-prior model from Log-likelihood evaluators.
program logit_normal
version 18
args lnp xb
// compute log likelihood
tempvar lnfj
quietly generate double `lnfj' = ln(invlogit( `xb'))
if $MH_y == 1 & $MH_touse
quietly replace `lnfj' = ln(invlogit(-`xb')) if $MH_y == 0 & $MH_touse
quietly summarize `lnfj', meanonly
tempname lnf
scalar `lnf' = r(sum)
if r(N) < $MH_n {
scalar `lnf' = .
exit
}
// compute log posterior
scalar `lnp' = `lnf' + lnnormalden($MH_b[1,1],0,5) +
lnnormalden($MH_b[1,2],0,5)
end
We write a new program called logit_normal, which is a straightforward extension of the logitll program. We compute the log likelihood as we did before, but we now return the overall log posterior lnp instead of the overall log likelihood lnf. The log posterior lnp is computed as the sum of the log likelihood and the log prior distributions of the two parameters. Global macro MH_b contains the name of a temporary vector of coefficients; $MH_b[1,1] contains the current value of the first parameter, mpg, and $MH_b[1,2] contains the current value of the second parameter, _cons.
We specify the name of the new evaluator in option evaluator().
. bayesmh foreign mpg, evaluator(logit_normal) rseed(12345) Burn-in ... Simulation ... Model summary
| Posterior: foreign ~ logitll(xb_foreign) |
| Equal-tailed | ||
| foreign | Mean Std. dev. MCSE Median [95% cred. interval] | |
| mpg | .1582694 .0521761 .001671 .1562921 .0653649 .2642418 | |
| _cons | -4.338317 1.188011 .038196 -4.279862 -6.778805 -2.230852 | |
The results are identical to the normal-prior model in Log-likelihood evaluators.
View a complete list of Bayesian analysis features.
