OFFSET
1,1
COMMENTS
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..4469
EXAMPLE
8 is a term because 8 = 2^3 = 3 + 5.
49 is a term because 49 = 7^2 = 13 + 17 + 19.
121 is a term because 121 = 11^2 = 37 + 41 + 43.
PROG
(PARI) list(lim)=my(v=List(), n=1, p, q, t, s); while(1, t=primes(n++); p=2; q=t[n]; s=vecsum(t); if(s>lim, return(Set(v))); while(s<=lim, if(isprimepower(s)>1, listput(v, s)); q=nextprime(q+1); s+=q-p; p=nextprime(p+1))) \\ Charles R Greathouse IV, May 05 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Altug Alkan, May 05 2016
EXTENSIONS
a(9)-a(34) from Charles R Greathouse IV, May 05 2016
STATUS
approved