A285685 Characteristic sequence of the Beatty sequence, A022839, of sqrt(5).

0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0

Offset

1

Comments

The positions of 0 are given by A108598, and of 1, by A022839.

Links

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

Formula

a(n) = 1 - floor((n+1)*(1-1/r) - floor(n*(1-1/r))), where r = sqrt(5). [corrected by Georg Fischer, Aug 31 2022]

Mathematica

r = Sqrt[5]; 1 - Table[Floor[(n + 1) (1 - 1/r) - Floor[n (1 - 1/r)]], {n, 1, 200}]

Crossrefs

Cf. A022839, A108598.

Sequence in context: A191152 A139312 A323239 * A287773 A173923 A260393

Adjacent sequences: A285682 A285683 A285684 * A285686 A285687 A285688

Keyword

nonn,easy

Author

Clark Kimberling, May 11 2017

Status

approved