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))})}
}

Try the GauPro package in your browser

Any scripts or data that you put into this service are public.

GauPro documentation built on April 11, 2023, 6:06 p.m.