A285686 Characteristic sequence of the Beatty sequence, A022840, of sqrt(6).

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

Offset

1

Comments

The positions of 0 are given by A138235, and of 1, by A022840.

(a(n)) is fixed point of the morphism 0 -> 01010, 1 -> 01010010100101001. - Michel Dekking, May 29 2017

Links

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

D. Crisp, W. Moran, A. Pollington, and P. Shiue, Substitution invariant cutting sequences, Journal de théorie des nombres de Bordeaux 5, (1993), p. 123-137.

Formula

a(n) = floor((n+1)r) - floor(nr), where r = sqrt(6)/6. - corrected and simplified by Michel Dekking, May 29 2017

Mathematica

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

Crossrefs

Cf. A022840, A138235.

Sequence in context: A145573 A092202 A358846 * A303591 A159684 A244221

Adjacent sequences: A285683 A285684 A285685 * A285687 A285688 A285689

Keyword

nonn,easy

Author

Clark Kimberling, May 11 2017

Status

approved