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

-2, 0, 1, -3, 6, -9, 9, 1, -36, 126, -326, 726, -1452, 2640, -4356, 6436, -8256, 8568, -5864, 456, -911, 40106, -210419, 733448, -2085526, 5200300, -11748374, 24416952, -46909838, 82930836, -132479946, 182029056, -182029056, 0, 670853984, -2480588544

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A000201, A001622, A325745, A325664.

Sequence in context: A226874 A267901 A276561 * A325842 A153506 A325670

Adjacent sequences: A325743 A325744 A325745 * A325747 A325748 A325749

Keyword

easy,sign

Author

Clark Kimberling, Jun 06 2019

Status

approved