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

1, 4, 31, 329, 4316, 66543, 1172077, 23139068, 504673027, 12023659317, 310112290044, 8596075462411, 254551364575929, 8012189624924740, 266901629110149847, 9374566215360038977, 346044223246303101068

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

Crossrefs

Column k=8 of A162663.

Sequence in context: A349739 A359621 A076280 * A122400 A107725 A145160

Adjacent sequences: A141002 A141003 A141004 * A141006 A141007 A141008

Keyword

nonn

Author

R. J. Mathar, Jul 11 2008

Status

approved