A286654 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A286654

Characteristic sequence of the Beatty sequence, A022841, of sqrt(7).

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

COMMENTS

The positions of 0 are given by A285676, and of 1, by A022841.

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(7). [corrected by Georg Fischer, Sep 01 2022]

MATHEMATICA

r = Sqrt[7];

s = 1 - Table[Floor[(n + 1) (1 - 1/r) - Floor[n (1 - 1/r)]], {n, 1, 200}] (* A286654 *)

Flatten[Position[s, 0]] (* A285676 *)