A256971 Partial sums of A256970.

5, 22, 59, 64, 165, 170, 367, 624, 629, 1030, 1035, 1612, 2289, 2294, 2311, 2316, 2329, 3626, 3631, 5232, 5237, 5250, 5279, 5284, 5325, 5330, 8247, 11384, 11389, 11402, 11407, 11424, 15781, 15786, 15799, 15804, 21281, 21334, 21339, 21376

Offset: 1

Author

N. J. A. Sloane, Apr 19 2015

Keywords

• nonn

References

• Richard Friedberg, An Adventurer's Guide to Number Theory, McGraw-Hill, NY, 1968.
• Popular Computing (Calabasas, CA), Friedberg's Sequence, Vol. 5 (No. 46, Jan 1977), page PC46-2.

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A053755, A256970.

Programs

Haskell

a256971 n = a256971_list !! (n-1)
a256971_list = scanl1 (+) a256970_list

Mathematica

Accumulate[Table[FactorInteger[4*n^2+1][[1,1]],{n,40}]] (* Ivan N. Ianakiev, Apr 20 2015 *)