data(Hepta)
Data = Hepta$Data
TransList = RobustNormalization(Data, Centered = TRUE, WithBackTransformation = TRUE)
HeptaData = RobustNorm_BackTrafo(TransList$TransformedData,
TransList$MinX,
TransList$Denom,
TransList$Center)
sum(HeptaData - Data) #
Run the code above in your browser using DataLab