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

1, 1, -2, 4, -8, 16, -31, 56, -91, 126, -126, 0, 462, -1715, 4704, -11319, 25186, -52920, 105841, -201704, 364819, -620312, 973028, -1352078, 1486674, -657799, -2750022, 11967739, -32805248, 74480266, -148960531, 265105676, -408608551, 487599186, -201501426

Offset

1,3

Links

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

Mathematica

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

Crossrefs

Cf. A054385.

Sequence in context: A054016 A051039 A325730 * A056183 A000127 A133552

Adjacent sequences: A325746 A325747 A325748 * A325750 A325751 A325752

Keyword

easy,sign

Author

Clark Kimberling, Jun 07 2019

Status

approved