OFFSET
1,1
COMMENTS
Partial sums of A031368. - Michel Marcus, Oct 27 2015
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
EXAMPLE
p_1=2, p_2=3 and p_3=5, therefore a(2) = p_1 + p_3 = 2 + 5 = 7.
MATHEMATICA
A077131list[nmax_]:=Accumulate[Prime[Range[1, 2nmax, 2]]]; A077131list[100] (* Paolo Xausa, Aug 28 2023 *)
Accumulate[Prime[Range[1, 101, 2]]] (* Harvey P. Dale, Nov 08 2024 *)
PROG
(PARI) a(n)=if(n<1, 0, sum(k=1, n, prime(2*k-1)))
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Jon Perry, Nov 29 2002
STATUS
approved