A325667 First term of n-th difference sequence of (floor(k*r)), r = -sqrt(3), k >= 0.

-2, 0, 0, 1, -4, 10, -20, 36, -64, 120, -240, 496, -1024, 2080, -4159, 8240, -16248, 31824, -61403, 115292, -207670, 352716, -550430, 748144, -748144, 0, 2848366, -10897032, 30955332, -77558759, 181129040, -404458736, 875889376, -1855921143, 3870685664

Offset: 1

Author

Clark Kimberling, May 13 2019

Keywords

• easy
• sign

Links

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

Crossrefs

Cf. A325664, A325666.

Programs

Mathematica

Table[First[Differences[Table[Floor[-Sqrt[3]*n], {n, 0, 50}], n]], {n, 1, 50}]