|
|
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 radix-7 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 space-filling curve (called R7-dragon 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 radix-R counting", pp. 95-101, 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
|
|
|
|