A325672 First term of n-th difference sequence of (floor(k*r)), r = sqrt(7), k >= 0.
2, 1, -2, 4, -7, 10, -10, 1, 26, -80, 161, -242, 242, 1, -730, 2188, -4376, 6580, -6733, 1140, 13718, -32945, 18920, 158356, -851599, 2896920, -8097220, 20058301, -45540944, 96506230, -193012459, 367077448, -667617643, 1166803110, -1968991970, 3225375253
Offset: 1
Links
- Clark Kimberling, Table of n, a(n) for n = 1..200
Programs
-
Mathematica
Table[First[Differences[Table[Floor[Sqrt[7]*n], {n, 0, 30}], n]], {n, 0, 50}]