Mercurial > hg > octave-max

diff scripts/sparse/sprand.m @ 13058:14422cc782b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
codesprint: Write input validation and tests for sprandn.m * sprandn.m: Add input validation. Add tests for function * sprand.m: Remove unneeded output from find().
author Rik <octave@nomad.inbox5.com>
date Sat, 03 Sep 2011 10:25:25 -0700
parents 63d06af0376a
children 5976ba269538
line wrap: on
line diff
--- a/scripts/sparse/sprand.m
+++ b/scripts/sparse/sprand.m
@@ -52,9 +52,9 @@
   endif
 
   if (nargin == 1)
-    [i, j, v] = find (m);
+    [i, j] = find (m);
     [nr, nc] = size (m);
-    S = sparse (i, j, rand (size (v)), nr, nc);
+    S = sparse (i, j, rand (size (i)), nr, nc);
     return;
   endif