login
A155852
n is prime and is the sum of the first k primes for some k in A071151.
0
3, 509, 146749, 26444543, 187206119, 735187721, 1662266153, 2146936021, 2844048943, 4335869143, 5539721989, 5990371801, 6145377247, 6788645863, 10092092897, 19122368737, 20186509381, 25745240897, 32732349829
OFFSET
1,1
COMMENTS
3+127+379=509 (prime), ...
MATHEMATICA
s1=s2=0; lst={}; Do[p=Prime[n]; s1+=p; If[PrimeQ[s1], s2+=s1; If[PrimeQ[s2], AppendTo[lst, s2]]], {n, 2, 8!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved