Mercurial > octave-nkf
diff scripts/sparse/svds.m @ 10549:95c3e38098bf
Untabify .m scripts
author | Rik <code@nomad.inbox5.com> |
---|---|
date | Fri, 23 Apr 2010 11:28:50 -0700 |
parents | 923c7cb7f13f |
children | 4cdc43c095c5 |
line wrap: on
line diff
--- a/scripts/sparse/svds.m Fri Apr 23 11:13:48 2010 -0700 +++ b/scripts/sparse/svds.m Fri Apr 23 11:28:50 2010 -0700 @@ -142,10 +142,10 @@ ## this can also be an issue. However, we'd like to avoid double ## k for all scalar value of sigma... [V, s, flag] = eigs ([sparse(m,m), b; b', sparse(n,n)], - 2 * k, b_sigma, b_opts); + 2 * k, b_sigma, b_opts); else [V, s, flag] = eigs ([sparse(m,m), b; b', sparse(n,n)], - k, b_sigma, b_opts); + k, b_sigma, b_opts); endif s = diag (s); @@ -184,7 +184,7 @@ if (length (s) < k) warning ("returning fewer singular values than requested"); if (!ischar (sigma)) - warning ("try increasing the value of sigma"); + warning ("try increasing the value of sigma"); endif endif