OFFSET
1,3
LINKS
A. L. L. Gao, S. Kitaev, P. B. Zhang. On pattern avoiding indecomposable permutations, arXiv:1605.05490 [math.CO], 2016.
MATHEMATICA
Table[BellB[n] - Sum[BellB[k], {k, 0, n-2}], {n, 1, 30}] (* Vaclav Kotesovec, Apr 02 2017 *)
PROG
(Python)
from sympy import bell
print([bell(n) - sum(bell(k) for k in range(n - 1)) for n in range(1, 30)]) # Indranil Ghosh, Apr 03 2017 (translated from Mathematica)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 02 2017
EXTENSIONS
More terms from Vaclav Kotesovec, Apr 02 2017
STATUS
approved