#' Print Method for Cost-Effectiveness Trees
#'
#' @param decisiontree
#' @param ...
#'
#' @return
#' @export
#'
#' @examples
print.costeffectiveness_tree <- function(decisiontree, ...){
do.call(data.tree:::print.Node, c(decisiontree, decisiontree$fieldsAll, limit = 1000))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.