login
A157494
Primes in A014150.
0
2, 1429, 32869, 3189059, 5157791, 62701339, 139181423, 296686879, 522304883, 5070516751, 6276844867, 7098350179, 8983996079, 9331926623, 21211375343, 31177858939, 34861039007, 38865340309, 39918757589, 62858815181
OFFSET
1,1
MATHEMATICA
s0=s1=s2=0; lst={}; Do[p=Prime[n]; s0+=p; s1+=s0; s2+=s1; If[PrimeQ[s2], AppendTo[lst, s2]], {n, 7!}]; lst
KEYWORD
nonn
AUTHOR
STATUS
approved