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

2, 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

Comments

Differs from A325745 in first term only.

Links

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

Crossrefs

Cf. A001950, A001622, A325745.

Programs

Mathematica

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