OFFSET
1,2
PROG
(PARI) for(n=1, 10^6, x=sum(k=0, n, (-1)^k*k!); if(Mod(x, n)==0 && issquarefree(n), print(n)))
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Jason Earls, Sep 28 2001
EXTENSIONS
a(17)-a(29) from Donovan Johnson, Nov 30 2008
STATUS
approved