## S3 method for class 'bkmrfit'summary( object, q = c(0.025,0.975), digits =5, show_ests =TRUE, show_MH =TRUE,...)
Arguments
object: an object of class "bkmrfit"
q: quantiles of posterior distribution to show
digits: the number of digits to show when printing
show_ests: logical; if TRUE, prints summary statistics of posterior distribution
show_MH: logical; if TRUE, prints acceptance rates from the Metropolis-Hastings algorithm
...: further arguments passed to or from other methods.
Returns
No return value, prints more detailed summary of fit to console
Examples
## First generate datasetset.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 inferenceset.seed(111)fitkm <- kmbayes(y = y, Z = Z, X = X, iter =100, verbose =FALSE, varsel =TRUE)summary(fitkm)