1,1

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

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

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

Differences[b] (* A276861 *)

Cf. A038130, A276878.

Sequence in context: A024731 A195504 A098537 * A131703 A329087 A135357

Adjacent sequences: A276858 A276859 A276860 * A276862 A276863 A276864

nonn,easy

Clark Kimberling, Sep 24 2016

approved