OFFSET
0,4
LINKS
F. Luca and I. E. Shparlinski, On the squarefree parts of floor(e*n!), Glasgow Math. J., 49 (2007), 391-403.
PROG
(PARI) a(n) = core(n! * polcoeff(exp(x + x*O(x^n)) / (1 - x), n), 1)[2]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Feb 27 2013
STATUS
approved