OFFSET
1,2
COMMENTS
a(p) = p^2, p is a prime. a(n) <= n^2.
LINKS
Jon E. Schoenfield, Table of n, a(n) for n = 1..10000
MATHEMATICA
Do[k = 1; While[Mod[k!, n^n] > 0, k++ ]; Print[k], {n, 1, 30}] (* Ryan Propper, Jun 20 2005 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Apr 23 2004
EXTENSIONS
22 more terms from Ryan Propper, Jun 20 2005
More terms from Stefan Steinerberger, Feb 12 2006
More terms from Jon E. Schoenfield, Jan 06 2009
STATUS
approved