login
A256971
Partial sums of A256970.
2
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,1
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
MATHEMATICA
Accumulate[Table[FactorInteger[4*n^2+1][[1, 1]], {n, 40}]] (* Ivan N. Ianakiev, Apr 20 2015 *)
PROG
(Haskell)
a256971 n = a256971_list !! (n-1)
a256971_list = scanl1 (+) a256970_list
CROSSREFS
Sequence in context: A033445 A208946 A245301 * A273685 A050533 A212094
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 19 2015
STATUS
approved