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

1, 1, -2, 4, -7, 10, -10, 0, 35, -125, 325, -725, 1451, -2639, 4355, -6435, 8255, -8567, 5863, -455, 910, -40105, 210418, -733447, 2085525, -5200299, 11748373, -24416951, 46909837, -82930835, 132479945, -182029055, 182029055, 1, -670853985, 2480588545

Offset: 1

Author

Clark Kimberling, Jun 06 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A001622, A325664. Inverse binomial transform of A000201.

Programs

Mathematica

Table[First[Differences[Table[Floor[GoldenRatio*n], {n, 0, 50}], n]], {n, 2, 50}]