A325731 First term of n-th difference sequence of (floor(k*r)), r = sqrt(2/3), k >= 0.

0, 1, -1, 1, -1, 0, 5, -20, 55, -125, 250, -450, 725, -1000, 1000, 1, -3642, 13278, -35344, 81720, -174098, 352716, -694904, 1355322, -2652200, 5245956, -10491911, 21097440, -42262518, 83482620, -161013975, 300338820, -536165400, 903201960, -1401448500

Offset: 1

Author

Clark Kimberling, May 20 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A325664. Inverse binomial transform of A171974.

Programs

Mathematica

Table[First[Differences[Table[Floor[Sqrt[2/3]*n], {n, 0, 50}], n]], {n, 1, 50}]