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

0, 1, -2, 4, -8, 16, -31, 56, -91, 126, -126, 0, 462, -1715, 4704, -11319, 25186, -52920, 105840, -201684, 364609, -618772, 964173, -1309574, 1309574, 1, -4970097, 18874639, -52835258, 129107566, -290081057, 612479308, -1227418279, 2343572690, -4261482736

Offset

1,3

Links

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

Mathematica

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

Crossrefs

Cf. A325664.

Sequence in context: A054517 A054016 A051039 * A325749 A056183 A000127

Adjacent sequences: A325727 A325728 A325729 * A325731 A325732 A325733

Keyword

easy,sign

Author

Clark Kimberling, May 19 2019

Status

approved