For a valid BayesMfp object, extract posterior expected g and shrinkage factor g/(1+g)
getPostExpectedg(x, design=getDesignMatrix(x), nObs = nrow(design),
dim = ncol(design))
getPostExpectedShrinkage(x, design=getDesignMatrix(x),
nObs =nrow(design), dim = ncol(design))
The posterior expected g or shrinkage factor g/(1+g) from the model.
a valid BayesMfp
-Object of length 1 (otherwise only first
element is recognized)
the (centered) design matrix
number of observations
number of design covariates
Daniel Saban\'es Bov\'e