OFFSET
1,8
COMMENTS
Also the Bell transform of A089064(n+1). For the definition of the Bell transform see A264428. - Peter Luschny, Jan 26 2016
FORMULA
E.g.f.: (1-log(1-x))^y. - Vladeta Jovovic, Nov 22 2003
EXAMPLE
1; 0,1; 1,0,1; 1,4,0,1; 8,5,10,0,1; 26,58,15,20,0,1; ...
MAPLE
# The function BellMatrix is defined in A264428.
# Adds (1, 0, 0, 0, ..) as column 0.
BellMatrix(n -> add((-1)^n*(k-1)!*combinat:-stirling1(n+1, k), k=1..n+1), 9); # Peter Luschny, Jan 26 2016
MATHEMATICA
BellMatrix[f_, len_] := With[{t = Array[f, len, 0]}, Table[BellY[n, k, t], {n, 0, len - 1}, {k, 0, len - 1}]];
B = BellMatrix[Function[n, Sum[(-1)^n*(k-1)! StirlingS1[n+1, k], {k, 1, n+1} ] ], rows = 12];
Table[B[[n, k]], {n, 2, rows}, {k, 2, n}] // Flatten (* Jean-François Alcover, Jun 28 2018, after Peter Luschny *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Vladeta Jovovic, Jan 30 2003
STATUS
approved