A245506 Number of endofunctions f on [n] such that f^10(i) = f(i) for all i in [n].

1, 1, 3, 12, 73, 556, 4737, 44122, 453441, 5226984, 69703201, 1132247854, 22865062497, 541274154604, 13810143608913, 361165919643666, 9534875308290433, 254667431232941008, 6928956222876625473, 193066959857334885334, 5521621116955849623201

Offset: 0

Author

Alois P. Heinz, Jul 24 2014

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..200

Crossrefs

Column k=10 of A245501.

Programs

Maple

egf:= exp(add((x*exp(x))^(3^j)/(3^j), j=0..2)):
a:= n-> n!*coeff(series(egf, x, n+1), x, n):
seq(a(n), n=0..25);

Formula

E.g.f: exp(Sum_{j=0..2} (x*exp(x))^(3^j)/(3^j)).