test/test_Whitening.R
In hetong007/rUFLDL: A pure R implementation of UFLDL
x = matrix(rnorm(6000),ncol=6)
x[,1] = runif(1000,min=0,max=0.1)
x[,2] = x[,1]+5
x[,3] = x[,2]*5
x[,4] = runif(1000,min=0.9,max=1)
x[,5] = x[,4]+5
x[,6] = x[,5]*5
for (i in 1:6)
x[,i] = (x[,i]-min(x[,i]))/(max(x[,i])-min(x[,i]))
Whitening(x,type='PCA')[1:5,]
Whitening(x,type='ZCA')[1:5,]
hetong007/rUFLDL documentation built on May 17, 2019, 3:43 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
x = matrix(rnorm(6000),ncol=6)
x[,1] = runif(1000,min=0,max=0.1)
x[,2] = x[,1]+5
x[,3] = x[,2]*5
x[,4] = runif(1000,min=0.9,max=1)
x[,5] = x[,4]+5
x[,6] = x[,5]*5
for (i in 1:6)
x[,i] = (x[,i]-min(x[,i]))/(max(x[,i])-min(x[,i]))
Whitening(x,type='PCA')[1:5,]
Whitening(x,type='ZCA')[1:5,]
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.