A276858 First differences of the Beatty sequence A022842 for sqrt(8).

2, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3, 3, 2, 3, 3, 3, 3

Offset: 1

Author

Clark Kimberling, Sep 24 2016

Keywords

• nonn
• easy

Links

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

Crossrefs

Cf. A022842, A276874.

Programs

Mathematica

z = 500; r = Sqrt[8]; b = Table[Floor[k*r], {k, 0, z}] (* A022842 *)
Differences[b] (* A276858 *)

Formula

a(n) = floor(n*r) - floor(n*r - r), where r = sqrt(8), n >= 1.