OFFSET
0,3
COMMENTS
EXAMPLE
A000110 = 52 = (1, 1, 3, 5, 15, 61) convolved with (1, 0, -1, 1, 2, -9)
= (61 - 5 + 3 + 2 - 9)
MATHEMATICA
nmax = 30; Table[a[j]/.SolveAlways[Table[Sum[a[k]*Sum[(-1)^(n-k-m)*StirlingS2[n-k+1, m+1], {m, 0, n-k}], {k, 0, n}]==BellB[n], {n, 0, nmax}], a][[1]], {j, 0, nmax}] (* Vaclav Kotesovec, Jul 26 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Gary W. Adamson, Jan 04 2009
EXTENSIONS
a(12) corrected and more terms added from Vaclav Kotesovec, Jul 26 2021
STATUS
approved