A276861 First differences of the Beatty sequence A038130 for 2*Pi.

6, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6, 6, 6, 7, 6, 6, 7, 6

Offset

1,1

Links

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

Formula

a(n) = floor(n*r) - floor(n*r - r), where r = 2*Pi, n >= 1.

Mathematica

z = 500; r = 2*Pi; b = Table[Floor[k*r], {k, 0, z}]; (* A038130 *)
Differences[b] (* A276861 *)

Crossrefs

Cf. A038130, A276878.

Sequence in context: A024731 A195504 A098537 * A131703 A352764 A329087

Adjacent sequences: A276858 A276859 A276860 * A276862 A276863 A276864

Keyword

nonn,easy

Author

Clark Kimberling, Sep 24 2016

Status

approved