R/plot.blca.boot.R

In BayesLCA: Bayesian Latent Class Analysis

Defines functions plot.blca.boot

Documented in plot.blca.boot

plot.blca.boot <-
function(x, which=1L, main="", ...){
  #class(x)<- "blca"
  #print("NextMethodUsed")
  show<- rep(FALSE, 5)
  show[which]<- TRUE
  if(show[5]){ 
  	warning("No diagnostic plot for bootstrapping method")
  	show[5]<- FALSE
  	}
  which<- c(1:4)[show]
  NextMethod("plot")
}

Try the BayesLCA package in your browser