login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A289028 Length of n-th iterate of the mapping 00->0010, 10->010, 1-->001, starting with 00. 2
2, 4, 7, 12, 20, 34, 58, 99, 169, 288, 491, 837, 1428, 2437, 4159, 7099, 12118, 20686, 35313, 60283, 102909, 175676, 299897, 511955, 873961, 1491944, 2546908, 4347844, 7422234, 12670546, 21629975, 36924676, 63034365, 107606391, 183695599 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

LINKS

Table of n, a(n) for n=0..34.

MATHEMATICA

z = 34; (* number of iterations *)

s = {0, 0}; w[0] = StringJoin[Map[ToString, s]];

w[n_] := StringReplace[w[n - 1], {"00" -> "0010", "01" -> "010", "10" -> "001"}]

TableForm[Table[w[n], {n, 0, 4}]]

Table[StringLength[w[n]], {n, 0, z}] (* A289028 *)

CROSSREFS

Cf. A289025.

Sequence in context: A094925 A289168 A289000 * A186537 A079970 A079816

Adjacent sequences:  A289025 A289026 A289027 * A289029 A289030 A289031

KEYWORD

nonn,easy

AUTHOR

Clark Kimberling, Jul 10 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 23 11:05 EDT 2019. Contains 323513 sequences. (Running on oeis4.)