This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A106036 #4 Oct 02 2016 10:16:42 %S A106036 1,2,1,2,3,1,2,1,2,3,1,2,3,3,1,2,1,2,3,1,2,1,2,3,1,2,3,3,1,2,1,2,3,1, %T A106036 2,3,3,1,2,3,3,1,2,1,2,3,1,2,1,2,3,1,2,3,3,1,2,1,2,3,1,2,1,2,3,1,2,3, %U A106036 3,1,2,1,2,3,1,2,3,3,1,2,3,3,1,2,1,2,3,1,2,1,2,3,1,2,3,3,1,2,1,2,3,1,2,3,3 %N A106036 Trajectory of 1 under the morphism 1->{1,2}, 2->{1,2,3}, 3->{1,2,3,3}. %C A106036 2-sided chain substitution sequence: characteristic polynomial x^3-4x^2+3*x. %D A106036 M. Baake and R. V. Moody, "Self-Similar Measures for Quasicrystals", in Directions in Mathematical Quasicrystals (eds. M. Baake and R. V. Moody), CRM Monograph Series, vol. 13, AMS, Providence, RI (2000), pp. 1-42. %H A106036 <a href="/index/Fi#FIXEDPOINTS">Index entries for sequences that are fixed points of mappings</a> %t A106036 s[1] = {1, 2}; s[2] = {1, 2, 3}; s[3] = {1, 2, 3, 3}; t[a_] := Flatten[s /@ a]; p[0] = {1}; p[1] = t[p[0]]; p[n_] := t[p[n - 1]] aa = p[6] %Y A106036 Cf. A106035. %K A106036 nonn %O A106036 0,2 %A A106036 _Roger L. Bagula_, May 05 2005