Mercurial > octave-nkf

comparison scripts/statistics/distributions/trnd.m @ 7007:6304d9ea0a30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-11 16:26:36 by jwe]
author jwe
date Thu, 11 Oct 2007 16:26:37 +0000
parents 20c48710b2c7
children 93c65f2a5668
comparison
equal deleted inserted replaced
7006:039ef140ac35 7007:6304d9ea0a30
51 if (isscalar (r) && (r > 0)) 51 if (isscalar (r) && (r > 0))
52 sz = [r, r]; 52 sz = [r, r];
53 elseif (isvector(r) && all (r > 0)) 53 elseif (isvector(r) && all (r > 0))
54 sz = r(:)'; 54 sz = r(:)';
55 else 55 else
56 error ("trnd: r must be a postive integer or vector"); 56 error ("trnd: r must be a positive integer or vector");
57 endif 57 endif
58 58
59 if (any (size (n) != 1) && 59 if (any (size (n) != 1) &&
60 ((length (size (n)) != length (sz)) || any (size (n) != sz))) 60 ((length (size (n)) != length (sz)) || any (size (n) != sz)))
61 error ("trnd: n must be scalar or of size sz"); 61 error ("trnd: n must be scalar or of size sz");