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

1, 0, 1, -3, 6, -9, 9, 0, -27, 81, -161, 231, -165, -363, 2079, -6435, 16071, -35343, 70686, -130339, 222717, -352715, 515944, -692967, 849299, -950455, 996435, -1042415, 1042415, 0, -6926040, 36515985, -137544209, 436316441, -1233171500, 3195484765

Offset: 1

Author

Clark Kimberling, Jun 07 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A003511.

Programs

Mathematica

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