ExtractSamps {bkmr}

Extract samples

Description

Extract samples of each parameter from the BKMR fit

Usage

ExtractSamps(fit, sel = NULL)

Arguments

fit

An object containing the results returned by a the kmbayes function

sel

logical expression indicating samples to keep; defaults to keeping the second half of all samples

Value

a list where each component contains the posterior samples of one of the parameters (or vector of parameters) being estimated

Examples

## First generate dataset
set.seed(111)
dat <- SimData(n = 50, M = 4)
y <- dat$y
Z <- dat$Z
X <- dat$X

## Fit model with component-wise variable selection
## Using only 100 iterations to make example run quickly
## Typically should use a large number of iterations for inference
set.seed(111)
fitkm <- kmbayes(y = y, Z = Z, X = X, iter = 100, verbose = FALSE, varsel = TRUE)

samps <- ExtractSamps(fitkm)