OFFSET
1,1
COMMENTS
It seems from observation that asymptotically a(n)/A006450(n) ~ 7.5*log(n) - e. But might this just be coincidence? I certainly have no proof. - Michael Turniansky, Aug 21 2015
LINKS
Michael Turniansky, Table of n, a(n) for n = 1..508
EXAMPLE
MATHEMATICA
L={}; s=0; p=2; While[Length@L < 100, If[PrimeQ[s+=(q = Prime@p)], AppendTo[L, q]]; p = NextPrime@ p]; L (* Giovanni Resta, Aug 21 2015 *)
PROG
(APL (NARS200 dialect)) (0π+\A←¯2π¯2π⍳1000)/A
(PARI) lista(nn) = {s = 0; forprime(p=2, nn, q = prime(p); s += q; if (isprime(s), print1(q, ", ")); ); } \\ Michel Marcus, Aug 20 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Michael Turniansky, Aug 10 2015
STATUS
approved