A325669 First term of n-th difference sequence of (floor(k*r)), r = -sqrt(5), k >= 0.

-3, 1, -1, 1, -2, 6, -16, 36, -72, 136, -256, 496, -992, 2016, -4096, 8256, -16512, 32896, -65536, 130816, -261631, 523754, -1048323, 2096152, -4183701, 8324850, -16480855, 32363020, -62784775, 119759850, -223346545, 404492000, -705032195, 1166803110

Offset: 1

Author

Clark Kimberling, May 13 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A325664, A325668.

Programs

Mathematica

Table[First[Differences[Table[Floor[-Sqrt[5]*n], {n, 0, 50}], n]], {n, 1, 50}]