powered by
This function solves the sign indeterminancy of the loadings by setting the maximum element in a singular vector to be positive.
signFlip(loadings)
A matrix of loadings.
An (eventually sign flipped) loadings matrix.
# NOT RUN { x<-diag(10) x[1,1]<--2 W<-signFlip(x) W[1,1] # }
Run the code above in your browser using DataLab