Mercurial > octave-nkf
comparison scripts/statistics/distributions/logistic_rnd.m @ 7007:6304d9ea0a30
[project @ 2007-10-11 16:26:36 by jwe]
author | jwe |
---|---|
date | Thu, 11 Oct 2007 16:26:37 +0000 |
parents | 34f96dd5441b |
children | 93c65f2a5668 |
comparison
equal
deleted
inserted
replaced
7006:039ef140ac35 | 7007:6304d9ea0a30 |
---|---|
43 if (isscalar (r) && (r > 0)) | 43 if (isscalar (r) && (r > 0)) |
44 sz = [r, r]; | 44 sz = [r, r]; |
45 elseif (isvector(r) && all (r > 0)) | 45 elseif (isvector(r) && all (r > 0)) |
46 sz = r(:)'; | 46 sz = r(:)'; |
47 else | 47 else |
48 error ("logistic_rnd: r must be a postive integer or vector"); | 48 error ("logistic_rnd: r must be a positive integer or vector"); |
49 endif | 49 endif |
50 else | 50 else |
51 print_usage (); | 51 print_usage (); |
52 endif | 52 endif |
53 | 53 |