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

1, 3, 22, 235, 3139, 49376, 891491, 18160071, 411124024, 10212362573, 275543711899, 8012352809874, 249516568317597, 8277748828228015, 291219448755079278, 10821916875914147551, 423314732431005599479

Offset: 0

Author

R. J. Mathar, Jul 11 2008

Keywords

• nonn

Links

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

Crossrefs

Column k=9 of A162663.

Programs

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, 9], {n, 0, 30}](* Vincenzo Librandi, Dec 12 2012 *)