|
Search: id:A105141
|
|
|
| A105141 |
|
Triangle read by rows, based on the morphism f: 1->{1,2,1}, 2->{2,3,2}, 3->{3,1,3}. First row is 1. If current row is a,b,c,..., then the next row is a,b,c,...,f(a),f(b),f(c),... |
|
+0
3
|
|
| 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 2, 3, 2, 3, 1, 3, 2, 3, 2, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 2, 3, 2, 1, 2, 1, 1, 2, 1, 1
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
COMMENT
|
3-symbol substitution tile called both ter dragon and fudge flake. This tile is the classic cyclotomic n=3.
Row n contains (3^(n+1)-1)/2 symbols.
|
|
REFERENCES
|
F. M. Dekking, Recurrent Sets, Advances in Mathematics, vol. 44, no. 1, 1982, page 96, section 4.10
|
|
MATHEMATICA
|
s[n_] := n /. {1 -> {1, 2, 1}, 2 -> {2, 3, 2}, 3 -> {3, 1, 3}}; t[a_] := Join[a, Flatten[s /@ a]]; Flatten[ NestList[t, {1}, 4]]
|
|
CROSSREFS
|
Cf. A073058, A105202, A105203.
Sequence in context: A083894 A128257 A106035 this_sequence A103961 A071891 A046072
Adjacent sequences: A105138 A105139 A105140 this_sequence A105142 A105143 A105144
|
|
KEYWORD
|
nonn,tabf
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Apr 09 2005
|
|
|
Search completed in 0.002 seconds
|
