R/bound.R

In ck37/tlmixture: Data-adaptive Creation Of Exposure (Treatment) Mixtures Using Targeted Learning

# CK: adapted from tmle package.
#---------- function .bound ---------------
# set outliers to min/max allowable values
# assumes data_vec contains only numerical data
#-----------------------------------------
#' Bound a vector
#'
#' @param data_vec vector of numeric elements
#' @param bounds vector of bounds
#'
#' @export
bound =
  function(data_vec, bounds) {
  data_vec[data_vec > max(bounds)] = max(bounds)
  data_vec[data_vec < min(bounds)] = min(bounds)
  return(data_vec)
}