A132008 Row sums of triangle A132007.
1, 3, 14, 98, 954, 12242, 199156, 3988248, 96094356, 2735515916, 90647239704, 3453539346232, 149695821098056, 7316061672718152, 400012182207670288, 24301065118906010048, 1630456684740565109904, 120168318315515773499952
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..300
Programs
-
Mathematica
T[n_, k_] := T[n, k] = If[k < 0 || n < k, 0, If[n == 0 && k == 0, 1, If[k == 0, T[n - 1, n - 1], T[n, k - 1] + n*T[n - 1, k - 1]]]]; Table[Sum[T[n, k], {k, 0, n}], {n, 0, 30}] (* G. C. Greubel, Dec 15 2017 *)
-
PARI
{ T(n, k)=if(k<0 || n
G. C. Greubel, Dec 15 2017
Comments