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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A289073 Positions of 1 in A289071; complement of A289072. 3
3, 5, 8, 12, 16, 19, 23, 26, 30, 32, 37, 39, 43, 47, 50, 53, 57, 61, 63, 66, 71, 73, 78, 80, 84, 88, 90, 95, 97, 102, 104, 107, 111, 115, 119, 121, 124, 129, 132, 135, 139, 142, 146, 149, 152, 156, 160, 162, 165, 170, 173, 176, 180, 182, 187, 189, 194, 196 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Conjecture: a(n)/n -> 2 + sqrt(2), and 0 < 2 + sqrt(2) - a(n)/n < 1 for n >= 1. .
LINKS
MATHEMATICA
z = 11; (* number of iterates *)
s = {0, 0}; w[0] = StringJoin[Map[ToString, s]];
w[n_] := StringReplace[w[n - 1], {"00" -> "0010", "01" -> "010", "10" -> "100"}]
TableForm[Table[w[n], {n, 0, 10}]]
st = ToCharacterCode[w[z]] - 48 (* A289071 *)
Flatten[Position[st, 0]] (* A289072 *)
Flatten[Position[st, 1]] (* A289073 *)
CROSSREFS
Sequence in context: A310031 A310032 A310033 * A023660 A161339 A023562
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jun 27 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 09:04 EDT 2024. Contains 371240 sequences. (Running on oeis4.)