R денормализовать данные

Question

Я нормализовал данные с помощью Min Max с этими 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. Однако, если вы переписываете свои данные, вам лучше сохранить значения min и max до нормализации, иначе (как указано в комментариях @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 функция ...)