A024931 a(n) = sum of remainders of n mod 2,4,6,...,2k, where k = [ n/2 ].

0, 0, 1, 0, 2, 2, 5, 2, 6, 8, 13, 6, 12, 16, 23, 16, 24, 24, 33, 26, 36, 44, 55, 34, 46, 56, 69, 62, 76, 72, 87, 72, 88, 102, 119, 94, 112, 128, 147, 122, 142, 140, 161, 154, 176, 196, 219, 170, 194, 206, 231, 224, 250, 250, 277, 248, 276, 302, 331, 276, 306, 334, 365, 334, 366, 368

Offset

2,5

Links

Table of n, a(n) for n=2..67.

Mathematica

Table[Total[Mod[n, Range[2, 2*Floor[n/2], 2]]], {n, 70}] (* Harvey P. Dale, Jun 06 2024 *)

Crossrefs

Sequence in context: A018216 A059907 A359101 * A256612 A305797 A029648

Adjacent sequences: A024928 A024929 A024930 * A024932 A024933 A024934

Keyword

nonn,changed

Author

Clark Kimberling

Status

approved