cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A293696 Irregular triangle read by rows in which row n lists the partial sums of prime numbers between 2^n+1 and 2^(n+1).

Original entry on oeis.org

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, 131, 268, 407, 556, 707, 864, 1027, 1194, 1367, 1546, 1727, 1918, 2111, 2308, 2507, 2718, 2941, 3168, 3397, 3630, 3869, 4110, 4361
Offset: 0

Views

Author

Olivier Gérard, Oct 15 2017

Keywords

Examples

			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
		

Crossrefs

Cf. A000040, A036378 (length of rows), A293697 (sequence of last item of each row).

Programs

  • 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 *)