A141007 E.g.f. exp(sum_{d|M} (exp(d*x)-1)/d), M=10.

1, 4, 34, 410, 6170, 109506, 2227882, 50987378, 1293386410, 35933906946, 1083069266634, 35146231883122, 1220316225699786, 45099576850647106, 1766204747811044266, 73012853049788936050, 3175271515525778312810

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..200

Mathematica

u[0, j_]: = 1; u[k_, j_]: = u[k, j] = Sum[Binomial[k-1, i-1]Plus@@(u[k-i, j]#^(i-1)&/@Divisors[j]), {i, k}]; Table[u[n, 10], {n, 0, 30}] (* Vincenzo Librandi, Dec 12 2012 *)

Crossrefs

Column k=10 of A162663.

Sequence in context: A197921 A196692 A197065 * A207570 A158839 A236964

Adjacent sequences: A141004 A141005 A141006 * A141008 A141009 A141010

Keyword

nonn

Author

R. J. Mathar, Jul 11 2008

Status

approved