R/print.MangroveTree.R

In Mangrove: Risk Prediction on Trees

Defines functions print.MangroveTree

Documented in print.MangroveTree

print.MangroveTree <-
function(x,...){
	cat("A Mangrove tree")
	if (length(x$getData()$data) > 0){
		cat(" with attached data")
	}
	cat(":\n")
	x$printTree()
}

Try the Mangrove package in your browser