get_training_data: #' @keywords internal where <- function(name, env =...

View source: R/get_training_data.R

get_training_dataR Documentation

#' @keywords internal where <- function(name, env = parent.frame()) if (identical(env, emptyenv())) stop("Can't find ", name, ".", call. = FALSE) else if (exists(name, envir = env, inherits = FALSE)) env else where(name, parent.env(env))

Description

#' @keywords internal where <- function(name, env = parent.frame()) if (identical(env, emptyenv())) stop("Can't find ", name, ".", call. = FALSE) else if (exists(name, envir = env, inherits = FALSE)) env else where(name, parent.env(env))

Usage

get_training_data(object)

pdp documentation built on June 8, 2022, 1:07 a.m.