data(data)
## sparse
fit = BayesQVGEL(y,e,C,g,w,k,structure=c("group"))
selected=selection(fit,sparse=TRUE)
selected
# \donttest{
## non-sparse
fit = BayesQVGEL(y,e,C,g,w,k,sparse=FALSE,structure=c("group"))
selected=selection(fit,sparse=FALSE)
selected
# }
Run the code above in your browser using DataLab