A065251 Simple quasi-periodic sequence consisting of the terms 1, 0 and -1.

1, 1, 0, 1, 0, -1, 1, 1, 0, -1, 1, 0, -1, 1, 0, 1, 0, -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, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0, -1, 1, 0

Offset

1,1

Links

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

A. Karttunen, Conjecture regarding A065249 and A065251

Formula

a(n) = 1-((n-2^[log_2(n)]) mod 3)

Maple

[seq(A065251(j), j=1..120)]; A065251 := n -> 1-((n-2^floor_log_2(n)) mod 3);

Mathematica

Table[1-Mod[n-2^Floor[Log[2, n]], 3], {n, 110}] (* Harvey P. Dale, Dec 25 2017 *)

Crossrefs

The same sequence modulo 3: A065252. Cf. A065249.

Sequence in context: A285518 A093719 A153778 * A039982 A267349 A254651

Adjacent sequences: A065248 A065249 A065250 * A065252 A065253 A065254

Keyword

sign

Author

Antti Karttunen, Oct 25 2001

Status

approved