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

1, 6, 64, 930, 16780, 356922, 8681380, 236739354, 7135453180, 235079261562, 8389974421012, 322019941283514, 13211434169884204, 576435716324437722, 26631611751773999044, 1297943388416061780186

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

Crossrefs

Column k=12 of A162663.

Sequence in context: A264634 A296165 A173500 * A336114 A354494 A370894

Adjacent sequences: A141005 A141006 A141007 * A141009 A141010 A141011

Keyword

nonn

Author

R. J. Mathar, Jul 11 2008

Status

approved