A325748 First term of n-th difference sequence of (floor(k/e)), k >= 0.

0, 0, 1, -3, 6, -9, 9, 0, -27, 81, -161, 231, -165, -363, 2079, -6435, 16071, -35343, 70686, -130339, 222717, -352715, 515944, -692967, 849299, -950455, 996435, -1042415, 1042415, 1, -6926071, 36516481, -137549665, 436362817, -1233496132, 3197432557

Offset: 1

Author

Clark Kimberling, Jun 07 2019

Keywords

• easy
• sign

Links

• Clark Kimberling, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A068985.

Programs

Mathematica

Table[First[Differences[Table[Floor[n/E], {n, 0, 50}], n]], {n, 1, 50}]