OFFSET
1,1
COMMENTS
Self-composition of e.g.f. of A000040 (prime numbers).
LINKS
N. J. A. Sloane, Transforms
EXAMPLE
E.g.f.: A(x) = 4*x + 18*x^2/2! + 104*x^3/3! + 687*x^4/4! + 5064*x^5/5! + 40934*x^6/6! + ...
MATHEMATICA
p[x_] := p[x] = Sum[Prime[k] x^k/k!, {k, 21}]; a[n_] := a[n] = SeriesCoefficient[p[p[x]], {x, 0, n}]; Table[n! a[n], {n, 21}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jun 26 2018
STATUS
approved