OFFSET
0,18
COMMENTS
For the definition of the Bell transform see A264428 and the link given there.
EXAMPLE
1,
0, 1,
0, 1, 1,
0, -1, 1, 1,
0, 1, -1, 1, 1,
0, -1, 4, 1, 5, 1,
0, 5, -163, 47, 7, 5, 1,
0, -691, 191, -109, 11, 7, 7, 1,
0, 7, -1431809, 6869, -253, 1, 119, 14, 1,
0, -3617, 130168, -7728013, 2659, -83, 11, 77, 6, 1.
MAPLE
MATHEMATICA
BellMatrix[f_, len_] := With[{t = Array[f, len, 0]}, Table[BellY[n, k, t], {n, 0, len - 1}, {k, 0, len - 1}]];
rows = 12;
B = BellMatrix[BernoulliB[2#, 1]&, rows];
Table[B[[n, k]] // Numerator, {n, 1, rows}, {k, 1, n}] // Flatten (*~, from Maple *) ~~~
CROSSREFS
KEYWORD
AUTHOR
Peter Luschny, Jan 21 2016
STATUS
approved