r - 非规范化数据

Question

我用这个 R 代码用最小值和最大值对数据进行了归一化：

normalize <- function(x) {
    return ((x - min(x)) / (max(x) - min(x)))
  }

mydata <- as.data.frame(lapply(mydata , normalize))

如何对数据进行非规范化？

Answer 1

本质上，您只需要反转算术：x1 = (x0-min)/(max-min)意味着x0 = x1*(max-min) + min. 但是，如果您要覆盖数据，则最好在标准化之前存储最小值和最大值，否则（正如@MrFlick 在评论中指出的那样）您注定要失败。

设置数据：

dd <- data.frame(x=1:5,y=6:10)

标准化：

normalize <- function(x) {
    return ((x - min(x)) / (max(x) - min(x)))
}
ddnorm <- as.data.frame(lapply(dd,normalize))
##      x    y
## 1 0.00 0.00
## 2 0.25 0.25
## 3 0.50 0.50
## 4 0.75 0.75
## 5 1.00 1.00

非规范化：

minvec <- sapply(dd,min)
maxvec <- sapply(dd,max)
denormalize <- function(x,minval,maxval) {
    x*(maxval-minval) + minval
}
as.data.frame(Map(denormalize,ddnorm,minvec,maxvec))
##   x  y
## 1 1  6
## 2 2  7
## 3 3  8
## 4 4  9
## 5 5 10

一个更聪明的normalize函数会将缩放变量作为属性附加到结果（参见?scale函数...）