A055829 a(n) = T(2n+5,n), array T as in A055818.
1, 95, 768, 5216, 33024, 201792, 1208320, 7145792, 41919744, 244590496, 1421823232, 8243669664, 47708339712, 275738420864, 1592186658816, 9187634766976, 52992487665152, 305556178607328, 1761501729738496
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..250
Crossrefs
Programs
-
Maple
T:= proc(i, j) option remember; if i=0 or j=0 then 1 else add(add(T(h,m), m=0..j), h=0..i-1) fi; end: seq(T(n+5, n), n=0..30); # G. C. Greubel, Jan 23 2020
-
Mathematica
T[i_, j_]:= T[i, j]= If[i==0 || j==0, 1, Sum[T[h, m], {h,0,i-1}, {m,0,j}]]; Table[T[n+5, n], {n,0,30}] (* G. C. Greubel, Jan 23 2020 *)
-
Sage
@CachedFunction def T(i, j): if (i==0 or j==0): return 1 else: return sum(sum(T(h,m) for m in (0..j)) for h in (0..i-1)) [T(n+5, n) for n in (0..30)] # G. C. Greubel, Jan 23 2020