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
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
New name from Wesley Ivan Hurt, Jan 30 2016
STATUS
approved