R/print.semforest.control.R

Defines functions print.semforest.control

Documented in print.semforest.control

#' @exportS3Method print semforest.control
print.semforest.control <- function(x, ...)
{
	stopifnot(is(x,"semforest.control"))

	cat("SEM-Forest control:\n-----------------\n")

	cat("Number of Trees: ", x$num.trees,"\n")
	cat("Sampling: ", x$sampling,"\n");
	cat("Comparisons per Node:", x$mtry,"\n\n")
	print.semtree.control(x$semtree.control)
}
brandmaier/semtree documentation built on Sept. 7, 2024, 10:38 p.m.