login
A036789
a(n) = Sum_{i=0..n} floor((2*i + 2)/(n - i + 1)).
1
2, 5, 8, 12, 17, 20, 26, 31, 36, 41, 48, 52, 59, 66, 71, 76, 86, 89, 98, 105, 110, 117, 126, 132, 139, 146, 155, 160, 171, 174, 184, 193, 198, 207, 218, 221, 230, 239, 248, 254, 265, 270, 279, 290, 297, 302, 315, 320, 332, 339, 346, 355, 366
OFFSET
0,1
COMMENTS
Original name was "A022821[ j ] - j - 1."
MAPLE
A036789:=n->add(floor((2*i+2)/(n-i+1)), i=0..n): seq(A036789(n), n=0..100); # Wesley Ivan Hurt, Jan 30 2016
MATHEMATICA
Table[Sum[Floor[(2 i + 2)/(n - i + 1)], {i, 0, n}], {n, 0, 100}] (* Wesley Ivan Hurt, Jan 30 2016 *)
CROSSREFS
Cf. A022821.
Sequence in context: A272719 A297834 A376356 * A330188 A214047 A241566
KEYWORD
nonn,easy
EXTENSIONS
New name from Wesley Ivan Hurt, Jan 30 2016
STATUS
approved