Mercurial > octave-antonio
comparison scripts/special-matrix/hilb.m @ 2314:949ab8eba8bc
[project @ 1996-07-12 03:58:02 by jwe]
author | jwe |
---|---|
date | Fri, 12 Jul 1996 03:58:02 +0000 |
parents | 5ca126254d15 |
children | 8b262e771614 |
comparison
equal
deleted
inserted
replaced
2313:5ca126254d15 | 2314:949ab8eba8bc |
---|---|
24 ## | 24 ## |
25 ## H (i, j) = 1 / (i + j - 1); | 25 ## H (i, j) = 1 / (i + j - 1); |
26 ## | 26 ## |
27 ## See also: hankel, vander, hadamard, invhilb, toeplitz | 27 ## See also: hankel, vander, hadamard, invhilb, toeplitz |
28 | 28 |
29 ## Author: jwe | |
30 | |
29 function retval = hilb (n) | 31 function retval = hilb (n) |
30 | 32 |
31 | 33 |
32 if (nargin != 1) | 34 if (nargin != 1) |
33 usage ("hilb (n)"); | 35 usage ("hilb (n)"); |