R反規範化數據

Question

我使用這些R腳本通過Min Max標準化數據。

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功能...）