R/transformations.R

Defines functions transform_to_0_1

transform_to_0_1 = function(Xin) {
  if (is.numeric(Xin)) {(Xin - min(Xin)) / (max(Xin) - min(Xin))}
  else if (is.matrix(Xin)) {apply(Xin, 2, function(Xin2){(Xin2 - min(Xin2)) / (max(Xin2) - min(Xin2))})}
}
CollinErickson/GauPro documentation built on March 25, 2024, 11:20 p.m.