OFFSET
0,4
LINKS
Wikipedia, Hankel matrix.
EXAMPLE
The array begins:
1, 1, 1, 1, 1, ...
1, 1, 2, 5, 14, ...
3, 9, 53, 406, 3612, ...
95, 979, 19148, 490614, 14798454, ...
38057, 1417675, 97432285, 8755482505, 930744290905, ...
...
MAPLE
with(LinearAlgebra):
C:= proc(n) option remember; binomial(2*n, n)/(n+1) end:
A:= (n, k)-> `if`(n=0, 1, Permanent(Matrix(n, (i, j)-> C(i+j+k-2)))):
seq(seq(A(d-k, k), k=0..d), d=0..8); # Alois P. Heinz, Dec 20 2023
MATHEMATICA
A[n_, k_]:=If[n==0, 1, Permanent[Table[CatalanNumber[i+j+k], {i, 0, n-1}, {j, 0, n-1}]]]; Table[A[n-k, k], {n, 0, 8}, {k, 0, n}]//Flatten
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Stefano Spezia, Dec 08 2023
STATUS
approved