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

1, 0, 1, -3, 6, -9, 9, 0, -27, 81, -162, 243, -243, 1, 714, -2067, 3695, -3519, -4896, 37621, -129999, 352716, -836111, 1802901, -3605802, 6760781, -11961081, 20058301, -32017846, 48916881, -72174561, 104394081, -151428366, 226511451, -357639591, 600805296

Offset: 1

Author

Clark Kimberling, May 23 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A325664.

Programs

Mathematica

Table[First[Differences[Table[Floor[(E/2)*n], {n, 0, 50}], n]], {n, 1, 50}]