R/summary.blca.vb.R

Defines functions summary.blca.vb

Documented in summary.blca.vb

summary.blca.vb <-
function(object, ...){
	sum1<- c(object$iter, object$lbstore[length(object$lbstore)] - object$lbstore[length(object$lbstore)-1], object$LB)
	names(sum1)<- c("IterNumber", "ConvergenceDiff", "Lower Bound")
	
	object$method<- "Variational Bayes"
	object$printnames<- c("Number of iterations:", "Lower Bound Increase at Convergence:", "Lower Bound:")
	object$sum1<- sum1

	NextMethod("summary")
	}

Try the BayesLCA package in your browser

Any scripts or data that you put into this service are public.

BayesLCA documentation built on July 2, 2020, 12:11 a.m.