OFFSET
0,5
EXAMPLE
Triangle starts:
1;
1, 1;
1, 2, 9;
1, 3, 15, 25;
1, 4, 22, 52, 145;
1, 5, 30, 90, 285, 561;
1, 6, 39, 140, 495, 1206, 2841;
1, 7, 49, 203, 791, 2261, 6027, 12489;
MAPLE
T := (n, k) -> simplify(2^k*GegenbauerC(k, -n, -1/4)):
for n from 0 to 9 do seq(T(n, k), k=0..n) od;
MATHEMATICA
Table[If[n == 0, 1, 2^k GegenbauerC[k, -n, -1/4]], {n, 0, 9}, {k, 0, n}] // Flatten (* Michael De Vlieger, May 08 2016 *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Peter Luschny, May 08 2016
STATUS
approved