A344514 a(n) = Sum_{k=1..n} floor(n/k^2)^k.
1, 2, 3, 5, 6, 7, 8, 12, 14, 15, 16, 22, 23, 24, 25, 34, 35, 43, 44, 54, 55, 56, 57, 69, 71, 72, 92, 106, 107, 108, 109, 140, 141, 142, 143, 199, 200, 201, 202, 222, 223, 224, 225, 247, 309, 310, 311, 400, 402, 434, 435, 461, 462, 554, 555, 583, 584, 585, 586, 616, 617
Offset: 1
Keywords
Examples
a(9) = Sum_{k=1..9} floor(9/k^2)^k = 9^1 + 2^2 + 1^3 = 14.
Crossrefs
Cf. A013936.
Programs
-
Mathematica
Table[Sum[Floor[n/k^2]^k, {k, n}], {n, 100}]