R/normalize_data.R

In swaRmverse: Swarm Space Creation

#' @title Normalize Data
#'
#' @description This function rescales a vector to values between 0 and 1.
#'
#' @param vec A numerical vector to normalize.
#'
#' @return A vector of doubles, the normalized values of the input vector.
#'
#' @author Marina Papadopoulou \email{m.papadopoulou.rug@@gmail.com}
#'
#' @examples
#' d <- rnorm(20, mean = 10, sd = 1)
#' normalize_data(d)
#'
#' @export
normalize_data <- function(vec) {
  vmax <- max(vec, na.rm = TRUE)
  vmin <- min(vec, na.rm = TRUE)

  ((vec - vmin) / (vmax - vmin))
}