OFFSET
0,1
LINKS
Olivier Gérard, Table of n, a(n) for n = 0..6541
EXAMPLE
The triangle begins
.
2
3
5,12
11,24
17,36,59,88,119
37,78,121,168,221,280,341
67,138,211,290,373,462,559,660,763,870,979,1092,1219
MATHEMATICA
Flatten@Table[
Rest@FoldList[Plus, 0,
Table[Prime[i], {i, PrimePi[2^(n)] + 1, PrimePi[2^(n + 1)]}]], {n,
0, 8}]
Table[Accumulate[Prime[Range[PrimePi[2^n]+1, PrimePi[2^(n+1)]]]], {n, 0, 10}] // Flatten (* Harvey P. Dale, Dec 26 2020 *)
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Olivier Gérard, Oct 15 2017
STATUS
approved