A286065 Positions of 0 in A286064; complement of A286066.

3, 5, 9, 10, 15, 17, 22, 23, 27, 29, 33, 34, 39, 40, 44, 46, 51, 53, 57, 58, 63, 65, 70, 71, 75, 77, 82, 84, 88, 89, 94, 95, 99, 101, 105, 106, 111, 113, 118, 119, 123, 125, 129, 130, 135, 136, 140, 142, 147, 149, 153, 154, 159, 160, 164, 166, 170, 171, 176

Offset

1,1

Comments

Conjecture: a(n)/n -> 3.

Links

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

Example

As a word, A286064 = 110101110011110101111001110......, in which 0 is in positions 3,4,9,10,15,...

Mathematica

s = Nest[Flatten[# /. {0 -> {0, 1}, 1 -> {1, 0}}] &, {0}, 9] (* A010060 *)
w = StringJoin[Map[ToString, s]]
w1 = StringReplace[w, {"0110" -> "1"}]
st = ToCharacterCode[w1] - 48 (* A286064 *)
Flatten[Position[st, 0]]  (* A286065 *)
Flatten[Position[st, 1]]  (* A286066 *)

Crossrefs

Cf. A010060, A286064, A286066.

Sequence in context: A269399 A345916 A175468 * A316296 A344293 A063038

Adjacent sequences: A286062 A286063 A286064 * A286066 A286067 A286068

Keyword

nonn,easy

Author

Clark Kimberling, May 08 2017

Status

approved