A255508 Partial sums of A255437.

1, 3, 6, 7, 10, 15, 21, 28, 36, 37, 40, 45, 55, 66, 78, 91, 105, 120, 121, 124, 129, 136, 153, 171, 190, 210, 231, 253, 276, 300, 301, 304, 309, 316, 325, 351, 378, 406, 435, 465, 496, 528, 561, 595, 630, 631, 634, 639, 646, 655, 666, 703, 741, 780, 820, 861

Offset

1,2

Links

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

Mathematica

Accumulate[Flatten[Table[If[IntegerQ[#], Range[1, 2*#, 2], m] & [Sqrt[m]], {m, 64}]]] (* Paolo Xausa, May 02 2026 *)

Prog

(Haskell)
a255508 n = a255508_list !! (n-1)
a255508_list = scanl1 (+) a255437_list

Crossrefs

Cf. A255437, A255879.

Sequence in context: A035000 A285569 A024412 * A262972 A115127 A258354

Adjacent sequences: A255505 A255506 A255507 * A255509 A255510 A255511

Keyword

nonn

Author

Reinhard Zumkeller, Mar 23 2015

Status

approved