1,1

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

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

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

Differences[b] (* A276858 *)

Cf. A022842, A276874.

Sequence in context: A089326 A237367 A022923 * A247656 A294081 A192454

Adjacent sequences: A276855 A276856 A276857 * A276859 A276860 A276861

nonn,easy

Clark Kimberling, Sep 24 2016

approved