## S3 method for class 'bkmrfit'print(x, digits =5,...)
Arguments
x: an object of class "bkmrfit"
digits: the number of digits to show when printing
...: further arguments passed to or from other methods.
Returns
No return value, prints basic 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)fitkm