A325840 First term of n-th difference sequence of (round(k*sqrt(2))), k >= 0.

1, 1, -2, 4, -8, 15, -25, 35, -35, 0, 126, -462, 1253, -2989, 6615, -13867, 27734, -52921, 95863, -163115, 255493, -352716, 379050, -134596, -828875, 3407821, -9217717, 20837509, -41675018, 74480265, -116145145, 143502875, -78990635, -286097760, 1453179125

Offset: 1

Author

Clark Kimberling, Jun 09 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A325664.

Programs

Mathematica

Table[First[Differences[Table[Round[Sqrt[2]*n], {n, 0, 50}], n]], {n, 1, 50}]