A285658 Positions of 0 in A285657; complement of A285659.

2, 8, 12, 16, 20, 24, 30, 34, 38, 44, 48, 52, 58, 62, 66, 72, 76, 80, 86, 90, 94, 98, 102, 108, 112, 116, 122, 126, 130, 136, 140, 144, 148, 152, 158, 162, 166, 172, 176, 180, 186, 190, 194, 198, 202, 208, 212, 216, 222, 226, 230, 236, 240, 244, 248, 252

Offset

1,1

Comments

Conjecture: a(n)/n -> (5 + sqrt(17))/2.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000 [term a(8731)=39826 -> 39824 and following corrected by Georg Fischer, Jun 04 2020]

Example

As a word, A285657 = 101111101..., in which 0 is in positions 2,8,12,16,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {1, 0, 1, 1}}] &, {0}, 10] (* A285657 *)
u = Flatten[Position[s, 0]]  (* A285658 *)
Flatten[Position[s, 1]]   (* A285659 *)
u/2 (* A286043 *)

Crossrefs

Cf. A285551, A285658, A285659.

Sequence in context: A180634 A139270 A176100 * A284802 A067884 A005880

Adjacent sequences: A285655 A285656 A285657 * A285659 A285660 A285661

Keyword

nonn,easy

Author

Clark Kimberling, May 01 2017

Status

approved