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?