%I A156595
%S A156595 0,1,1,0,1,0,0,1,0,0,1,1,0,1,0,0,1,1,0,1,1,0,1,0,0,1,1,0,1,1,0,1,0,0,1,
%T A156595 0,0,1,1,0,1,0,0,1,1,0,1,1,0,1,0,0,1,0,0,1,1,0,1,0,0,1,0,0,1,1,0,1,0,0,
%U A156595 1,1,0,1,1,0,1,0,0,1,0,0,1,1,0,1,0,0,1,0,0,1,1,0,1,0,0,1,1,0,1,1,0,1,0
%N A156595 Fixed point of the morphism 0->011, 1->010.
%C A156595 This sequence draws the Sierpinski gaskett, when iterating he following
odd-even drawing rule : If "1" then draw a segment forward, if "0"
then draw a segment forward and turn 120A degs right if in odd position
or left if in even position.
%D A156595 Combinatoris on words, M Lothaire.
%F A156595 apply morphism iteratively to infinity : 0->011 and 1->010
%e A156595 0 -> 0,1,1 -> 0,1,1,0,1,0,0,1,0 -> ...
%t A156595 Nest[ Flatten[ # /. {0 -> {0, 1, 1}, 1 -> {0, 1, 0}}] &, {0}, 10]
%Y A156595 Sequence in context: A057215 A029691 A053866 this_sequence A143222 A010060
A118247
%Y A156595 Adjacent sequences: A156592 A156593 A156594 this_sequence A156596 A156597
A156598
%K A156595 easy,nice,nonn
%O A156595 0,1
%A A156595 Alexis Monnerot-Dumaine (alexis.monnerotdumaine(AT)gmail.com), Feb 10
2009
|