OFFSET
0,9
COMMENTS
For the definition of the Bell transform see A264428 and the link given there.
EXAMPLE
1,
0, 1,
0, 1, 1,
0, 1, 3, 1,
0, 0, 17, 3, 1,
0, -1, 5, 65, 5, 1,
0, 0, 7, 55, 175, 15, 1,
0, 1, -7, 2023, 245, 385, 21, 1,
0, 0, -38, 49, 34181, 595, 371, 14, 1,
0, -1, 3, -14351, 973, 56567, 525, 217, 18, 1.
MAPLE
MATHEMATICA
BellMatrix[f_Function, len_] := With[{t = Array[f, len, 0]}, Table[BellY[n, k, t], {n, 0, len - 1}, {k, 0, len - 1}]];
rows = 12;
B = BellMatrix[Function[x, BernoulliB[x, 1]], rows];
Table[B[[n, k]] // Numerator, {n, 1, rows}, {k, 1, n}] // Flatten (* Jean-François Alcover, Jun 26 2018, from Maple *)
CROSSREFS
KEYWORD
AUTHOR
Peter Luschny, Jan 22 2016
STATUS
approved