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

Arguments
x 
matrix of gaussian random variale to transform 
GPCA_iter_param 

type 
see 
extremes 
see 
Value
the nonGaussian random variable
Note
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://dx.doi.org/doi/10.1117/12.834011
See Also
GPCA
,GPCA_iteration
,inv_GPCA_iteration
,inv_GPCA
,GPCAclass
for 'GPCA' S3 class
Examples
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)
