R/plot.blca.gibbs.R

In BayesLCA: Bayesian Latent Class Analysis

Defines functions plot.blca.gibbs

Documented in plot.blca.gibbs

plot.blca.gibbs <-
function(x, which=1L, main="", ...){
  #class(x)<- "blca"
  #print("NextMethodUsed")
  show<- rep(FALSE, 5)
  show[which]<- TRUE
  which<- c(1:4,8)[show]
  NextMethod("plot")
}

Try the BayesLCA package in your browser