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,3

Links

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

Formula

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

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);

Crossrefs

Column k=10 of A245501.

Sequence in context: A348222 A346664 A060906 * A275385 A247055 A163860

Adjacent sequences: A245503 A245504 A245505 * A245507 A245508 A245509

Keyword

nonn

Author

Alois P. Heinz, Jul 24 2014

Status

approved