OFFSET
0,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..104
Eric Weisstein's World of Mathematics, Bell Number
Eric Weisstein's World of Mathematics, Divisor Function
MATHEMATICA
Table[DivisorSigma[1, BellB[n]], {n, 0, 22}]
PROG
(Magma) [DivisorSigma(1, Bell(n)): n in [0..30]]; // Vincenzo Librandi, Sep 19 2015
(PARI) a000110(n) = n! * polcoeff( exp( exp( x + x * O(x^n)) - 1), n);
vector(30, n, sigma(a000110(n-1))) \\ Altug Alkan, Sep 26 2015
(PARI) a000110(n) = round(exp(-1)*suminf(k=0, 1.0*k^n/k!));
vector(30, n, sigma(a000110(n-1))) \\ Altug Alkan, Oct 04 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Sep 18 2015
EXTENSIONS
More terms from Vincenzo Librandi, Sep 19 2015
STATUS
approved