'Back transform from normal (Gaussian) data to actual data

I have converted raw data (a vector with some values) into normal (Gaussian) data, with mean = 0 and std = 1 with the following function:

nscores  <- qqnorm(RawVar)$x

Then, I wanted to convert the normal data back to Raw data. For that purpose, I have considered the backtr function as follow:

model <- data.frame(x = sort(RawVar), nscore = sort(nscores))
testbacktr <- backtr( nscores, model, tails = "none", draw = TRUE )

But, I do not get a reasonable answer. Is there any way to convert the data properly back to the actual units?



Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source