Mercurial > octave-antonio

comparison scripts/special-matrix/hilb.m @ 3369:f37ca3017116

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-11-21 16:26:02 by jwe]
author jwe
date Sun, 21 Nov 1999 16:26:08 +0000
parents 990ea337e950
children 5e0a0b1cba43
comparison
equal deleted inserted replaced
3368:a4cd1e9d9962 3369:f37ca3017116
15 ## You should have received a copy of the GNU General Public License 15 ## You should have received a copy of the GNU General Public License
16 ## along with Octave; see the file COPYING. If not, write to the Free 16 ## along with Octave; see the file COPYING. If not, write to the Free
17 ## Software Foundation, 59 Temple Place - Suite 330, Boston, MA 17 ## Software Foundation, 59 Temple Place - Suite 330, Boston, MA
18 ## 02111-1307, USA. 18 ## 02111-1307, USA.
19 19
20 ## usage: hilb (n) 20 ## -*- texinfo -*-
21 ## 21 ## @deftypefn {Function File} {} hilb (@var{n})
22 ## Return the Hilbert matrix of order n. The i, j element of a Hilbert 22 ## Return the Hilbert matrix of order @var{n}. The
23 ## matrix is defined as 23 ## @iftex
24 ## 24 ## @tex
25 ## H (i, j) = 1 / (i + j - 1); 25 ## $i,\,j$
26 ## 26 ## @end tex
27 ## @end iftex
28 ## @ifinfo
29 ## i, j
30 ## @end ifinfo
31 ## element of a Hilbert matrix is defined as
32 ## @iftex
33 ## @tex
34 ## $$
35 ## H (i, j) = {1 \over (i + j - 1)}
36 ## $$
37 ## @end tex
38 ## @end iftex
39 ## @ifinfo
40 ##
41 ## @example
42 ## H (i, j) = 1 / (i + j - 1)
43 ## @end example
44 ## @end ifinfo
45 ## @end deftypefn
46
27 ## See also: hankel, vander, sylvester_matrix, invhilb, toeplitz 47 ## See also: hankel, vander, sylvester_matrix, invhilb, toeplitz
28 48
29 ## Author: jwe 49 ## Author: jwe
30 50
31 function retval = hilb (n) 51 function retval = hilb (n)