A344552 a(n) = Sum_{k=1..n} floor(k*(n-k)/n).

0, 0, 0, 1, 2, 3, 4, 6, 10, 12, 14, 17, 22, 25, 28, 34, 40, 46, 50, 55, 62, 69, 74, 80, 94, 100, 108, 115, 126, 133, 142, 152, 164, 176, 184, 197, 210, 221, 230, 242, 260, 272, 286, 297, 314, 327, 340, 354, 378, 394, 406, 423, 442, 459, 472, 488, 512, 532, 548, 563, 590, 607

Offset

1,5

Links

Table of n, a(n) for n=1..62.

Mathematica

Table[Sum[Floor[k (n - k)/n], {k, n}], {n, 80}]

Crossrefs

Cf. A006218, A344514, A344551.

Sequence in context: A225649 A225651 A191149 * A122907 A070519 A177913

Adjacent sequences: A344549 A344550 A344551 * A344553 A344554 A344555

Keyword

nonn

Author

Wesley Ivan Hurt, May 22 2021

Status

approved