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

-3, 1, -2, 4, -8, 16, -32, 64, -128, 256, -511, 1012, -1969, 3718, -6721, 11440, -17875, 24310, -24310, 1, 92357, -352484, 997568, -2485241, 5754023, -12680954, 26924183, -55410641, 110821282, -215426354, 406270424, -740354803, 1294617071, -2145852302

Offset: 1

Author

Clark Kimberling, May 15 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A022840, A325664, A325670.

Programs

Mathematica

Table[First[Differences[Table[Floor[-Sqrt[6]*n], {n, 0, 30}], n]], {n, 0, 50}]