OFFSET
0,5
COMMENTS
For the definition of the Bell transform see A264428 and the link given there.
EXAMPLE
1,
1, 1,
1, 6, 1,
1, 30, 2, 1,
1, 42, 20, 1, 1,
1, 30, 63, 12, 3, 1,
1, 66, 1260, 504, 12, 2, 1,
1, 2730, 495, 360, 72, 4, 2, 1,
1, 6, 900900, 5940, 432, 2, 30, 3, 1,
1, 510, 15015, 1351350, 990, 80, 6, 10, 1, 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]] // Denominator, {n, 1, rows}, {k, 1, n}] // Flatten (* Jean-François Alcover, Jun 27 2018, from Maple *)
CROSSREFS
KEYWORD
AUTHOR
Peter Luschny, Jan 21 2016
STATUS
approved