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 June 25, 2024, 1:13 a.m.