We measure non-Gaussianity using Jarque-Bera (JB) statistic, which is a weighted combination of squared skewness and kurtosis, JB paper. The data has to be standardized and mean 0 and sd to 1.
calculateJB(S = NULL, U = NULL, X = NULL, alpha = 0.8)
the sum of JB score across all components.
the variable loadings r x px.
U matrix for matched columns rj x n
whitened data matrix n x px, data = whitenerXA %*% dXcentered
JB weighting of skewness and kurtosis. default = 0.8