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

1, 0, 1, -3, 6, -9, 9, 0, -27, 81, -161, 231, -165, -363, 2079, -6435, 16071, -35343, 70686, -130339, 222717, -352715, 515944, -692967, 849299, -950455, 996435, -1042415, 1042415, 0, -6926040, 36515985, -137544209, 436316441, -1233171500, 3195484765

Offset

1,4

Links

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

Mathematica

Table[First[Differences[Table[Floor[n*(1+sqrt(3))/2)], {n, 0, 50}], n]], {n, 1, 50}]

Crossrefs

Cf. A003511.

Sequence in context: A114041 A212712 A360049 * A325748 A057083 A000748

Adjacent sequences: A325747 A325748 A325749 * A325751 A325752 A325753

Keyword

easy,sign

Author

Clark Kimberling, Jun 07 2019

Status

approved