OFFSET
0,1
COMMENTS
Bisection of A007504.
LINKS
Ray Chandler, Table of n, a(n) for n = 0..10000
FORMULA
a(n) = A007504(2n+1).
MATHEMATICA
f[n_] := Sum[Prime[k], {k, n}]; Table[f[2n + 1], {n, 0, 42}]
Take[Accumulate[Prime[Range[160]]], {1, 160, 2}] (* Harvey P. Dale, Jan 11 2011 *)
PROG
(PARI) a(n) = sum(k=1, 2*n+1, prime(k)); \\ Michel Marcus, Jan 31 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Giovanni Teofilatto, Aug 10 2005
EXTENSIONS
Edited and extended by Ray Chandler, Aug 11 2005
STATUS
approved