OFFSET
1,2
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = A025475(n) - 1.
PROG
(PARI) list(lim)=my(v=List([0])); lim=lim\1+1; for(m=2, logint(lim, 2), forprime(p=2, sqrtnint(lim, m), listput(v, p^m-1))); Set(v) \\ Charles R Greathouse IV, Aug 26 2015
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 02 2014
STATUS
approved