A325751 First term of n-th difference sequence of (floor(r*k)), r = log(2), k >= 0.

0, 1, -1, 0, 3, -9, 18, -27, 27, 0, -81, 243, -485, 715, -624, -559, 4550, -14976, 39286, -92378, 203034, -424346, 848692, -1625754, 2977832, -5200299, 8628633, -13553462, 20083622, -28009215, 36801609, -45932172, 55400904, -64869636, 64869636, 0, -349578528

Offset

1,5

Links

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

Mathematica

Table[First[Differences[Table[Floor[n*Log[2]], {n, 0, 50}], n]], {n, 1, 50}]

Crossrefs

Cf. A002162.

Sequence in context: A112559 A030784 A203594 * A123877 A057681 A103312

Adjacent sequences: A325748 A325749 A325750 * A325752 A325753 A325754

Keyword

easy,sign

Author

Clark Kimberling, Jun 07 2019

Status

approved