OFFSET
1,1
COMMENTS
Partial sums of A031215. - Michel Marcus, Oct 27 2015
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
EXAMPLE
p_1=2, p_2=3, p_3=5 and p_4=7, therefore a(2) = p_2 + p_4 = 3 + 7 = 10.
MATHEMATICA
A077126list[nmax_]:=Accumulate[Prime[Range[2, 2nmax, 2]]]; A077126list[100] (* Paolo Xausa, Aug 28 2023 *)
PROG
(PARI) pc=1; ps=0; forprime (p=2, 500, pc=3-pc; if (pc==1, ps=ps+p; print1(ps", ")))
CROSSREFS
KEYWORD
nonn
AUTHOR
Jon Perry, Nov 29 2002
STATUS
approved