powered by
Computes a reduced SVD without sign ambiguity. Our convention is that the sign of each vector in U is chosen such that the coefficient with largest absolute value is positive.
canonicalSVD(X)
S
U
V
the input matrix
nu = 10 n = 350 m = 100 A_gamma <- rbind(matrix(0,n,m),-diag(m)/sqrt(nu)) svd.result = canonicalSVD(A_gamma) S <- svd.result$S S <- diag(S) V <- svd.result$V
Run the code above in your browser using DataLab