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

-3, 0, 0, 0, 0, 1, -6, 21, -56, 126, -252, 463, -804, 1365, -2366, 4368, -8736, 18565, -40410, 87381, -184604, 379050, -758100, 1486675, -2884776, 5592405, -10919090, 21572460, -43144920, 87087001, -176565486, 357913941, -723002336, 1453179126, -2906358251

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. A022842, A325664, A325674.

Programs

Mathematica

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