R/cut_by_tree.R

Defines functions cut_by_tree

Documented in cut_by_tree

#' Title
#'
#' @param tree
#' @param x
#' @param variable
#'
#' @return
#'
#' @examples
#'
#'
cut_by_tree <- function(tree, x, variable) {

  trees_splits <- tree$splits[, 4]
  cut_points <- c(-Inf, trees_splits, Inf)

  cuted_variable <- cut(x[, variable], breaks = cut_points, include.lowest = TRUE)

}
karabanb/BKmisc documentation built on March 29, 2021, 7:56 a.m.