Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A033998
Numbers n such that the sum of the primes <= n is a square.
4
23, 22073, 67187, 79427, 10729219, 3531577135439
OFFSET
1,1
LINKS
G. L. Honaker Jr. and C. Caldwell, Prime Curios!: 9
G. L. Honaker Jr. and C. Caldwell, Prime Curios!: 3531577135439
FORMULA
a(n) = Prime(A033997(n))
EXAMPLE
2+3+5+7+11+13+17+19+23 = 10^2 is a square, so 23 is in the sequence.
MATHEMATICA
Prime[#]&/@Flatten[Position[Accumulate[Prime[Range[710000]]], _?(IntegerQ[ Sqrt[#]]&)]] (* This program will generate the first 5 terms of the sequence. *) (* Harvey P. Dale, Jun 22 2013 *)
PROG
(PARI) s=0; forprime(p=2, 1e6, if(issquare(s+=p), print1(p", "))) \\ Charles R Greathouse IV, Feb 01 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Calculated by Jud McCranie
EXTENSIONS
3531577135439 from Giovanni Resta, May 27 2003
Edited by Ray Chandler, Mar 20 2007
STATUS
approved