# NOT RUN {
## Generate data
X = aux.gensamples()
## 3 types of preprocessing
X_center = aux.preprocess(X)
X_decorr = aux.preprocess(X,type="decorrelate")
X_whiten = aux.preprocess(X,type="whiten")
## Check with Covariance matrix
par(mfrow=c(1,3))
image(cov(X_center$pX),zlim=c(-50,50)); title("center");
image(cov(X_decorr$pX),zlim=c(-50,50)); title("decorrelate");
image(cov(X_whiten$pX),zlim=c(-50,50)); title("whitening")
# }
Run the code above in your browser using DataLab