A089894 - OEIS

A089894

Sum of primes <= p is even and sum is twice a prime.

5, 17, 257, 277, 313, 379, 487, 751, 773, 811, 1579, 1787, 2081, 2467, 2557, 2671, 2689, 3037, 3343, 3559, 4091, 4159, 4373, 4451, 4567, 4793, 5039, 5441, 6037, 6113, 6131, 6269, 6337, 6547, 6719, 6829, 7193, 7351, 7547, 7649, 8039, 8059, 9239, 9859

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,1

LINKS

Harvey P. Dale, Table of n, a(n) for n = 0..1000

EXAMPLE

17 is in the sequence because 2+3+5+7+11+13+17 = 58 and 58 = 2 * 29 and 29 is prime.

MATHEMATICA

Prime[#]&/@Flatten[Position[Accumulate[Prime[Range[1300]]], _?(EvenQ[#] && PrimeQ[#/2]&)]] (* Harvey P. Dale, Oct 04 2012 *)

PROG

(PARI) s=2; forprime(p=3, 15000, s=s+p; if(s%2, i=1, if(isprime(s/2), print1(p, ", "), )))

CROSSREFS

Sequence in context: A195570 A281504 A191500 * A077718 A235461 A271660

Adjacent sequences: A089891 A089892 A089893 * A089895 A089896 A089897

KEYWORD

easy,nonn

AUTHOR

Randy L. Ekl, Jan 10, 2004

STATUS

approved