OFFSET
0,5
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..20000
PROG
(PARI) a(n) = if (n==0, 0, if (n==1, 1, if (isprime(n), 1, factor(n)[1, 1]))) \\ Michel Marcus, Jun 03 2013
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Giovanni Teofilatto, May 20 2005
STATUS
approved