

A176405


Fixed point of morphism 0>0100110, 1>0110110


4



0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


COMMENTS

Also a(n) is the least significant nonzero digit in the radix7 expansion of (n+1).
The sequence, interpreted as left/right turns by 120 degrees (each turn followed by a unit line in the current direction) defines a spacefilling curve (called R7dragon in the fxtbook, see link below).
Also sequence of zeros and ones by morphism F>F0F1F1F0F0F1F, 0>0, 1>1.


LINKS

Table of n, a(n) for n=0..104.
Joerg Arndt: Matters Computational (The Fxtbook) (section 1.31.5 "Dragon curves based on radixR counting", pp. 95101, image on p. 97).


MATHEMATICA

Nest[Flatten[#/.{0>{0, 1, 0, 0, 1, 1, 0}, 1>{0, 1, 1, 0, 1, 1, 0}}]&, 0, 3] (* Harvey P. Dale, Mar 27 2015 *)


CROSSREFS

Sequence in context: A286339 A244735 A245938 * A084091 A080846 A082401
Adjacent sequences: A176402 A176403 A176404 * A176406 A176407 A176408


KEYWORD

nonn


AUTHOR

Joerg Arndt, Apr 16 2010


STATUS

approved



