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,4

Links

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

Mathematica

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

Crossrefs

Cf. A068985.

Sequence in context: A212712 A360049 A325750 * A057083 A000748 A325738

Adjacent sequences: A325745 A325746 A325747 * A325749 A325750 A325751

Keyword

easy,sign

Author

Clark Kimberling, Jun 07 2019

Status

approved