This function makes an inverse iteration of PCAGaussianization process
1 2  inv_GPCA_iteration(x = GPCA_iter_param$x_next, GPCA_iter_param, type = 3,
extremes = TRUE)

x 
matrix of gaussian random variale to transform 
GPCA_iter_param 

type 
see 
extremes 
see 
the nonGaussian random variable
This function is based on the inverse of the equation (1) of "PCA Gaussianization for OneClass Remote Sensing Image" by V. Laparra et al., http://ieeexplore.ieee.org/document/5413808/
GPCA
,GPCA_iteration
,inv_GPCA_iteration
,inv_GPCA
,GPCAclass
for 'GPCA' S3 class
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17  library(RMAWGEN)
set.seed(1222)
N < 20
x < rexp(N)
y < x+rnorm(N)
df < data.frame(x=x,y=y)
GPCA < GPCA_iteration(df,extremes=TRUE)
x < rnorm(N)
y < x+rnorm(N)
dfn < data.frame(x=x,y=y)
GPCAn < GPCA_iteration(dfn,extremes=TRUE)
df_out < inv_GPCA_iteration(GPCA_iter_param=GPCA,extremes=TRUE)
dfn_out < inv_GPCA_iteration(GPCA_iter_param=GPCAn,extremes=TRUE)

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.
Please suggest features or report bugs with the GitHub issue tracker.
All documentation is copyright its authors; we didn't write any of that.