A276395 Characteristic function of floor(36*n/25).

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

Offset

1

Links

Table of n, a(n) for n=1..80.

Fraenkel, Aviezri S., Mordechai Mushkin, and Uzi Tassa, Determination of floor(n*theta) by its sequence of differences, Canad. Math. Bull 21:4 (1978), pp. 441-446.

Formula

Periodic with period (110110110111011011011011101101101101).

Prog

(PARI) lista(nn) = my(v=vector(nn, k, 36*k\25)); for (k=1, nn, print1(vecsearch(v, k)>0, ", "));  \\ Michel Marcus, Sep 10 2016

Crossrefs

Cf. A276394.

Sequence in context: A015923 A014768 A015527 * A232750 A080764 A291137

Adjacent sequences: A276392 A276393 A276394 * A276396 A276397 A276398

Keyword

nonn

Author

N. J. A. Sloane, Sep 09 2016

Status

approved