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 A179542 #12 Sep 19 2017 04:29:17
%S A179542 1,1,2,3,1,2,3,1,2,1,1,2,3,1,2,1,1,2,3,1,2,1,2,3,1,2,3,1,2,1,1,2,3,1,
%T A179542 2,1,2,3,1,2,3,1,2,1,1,2,3,1,2,1,2,3,1,2,1,1,2,3,1,2,1,1,2,3,1,2,1,2,
%U A179542 3,1,2,3,1,2,1,1,2,3,1,2,1,2,3,1,2,1,1,2,3,1,2,1,1,2,3,1,2,1,2,3,1,2,3,1,2
%N A179542 Trajectory of 1 under the morphism 1->(1,2,3), 2->(1,2), 3->(1) related to the heptagon and A006356.
%C A179542 Given M = the generating matrix for the heptagon shown in A006356:
%C A179542 [1,1,1; 1,1,0; 1,0,0] take powers of M, extracting top row getting:
%C A179542 (1,1,1), (3,2,1), (6,5,3), (14,11,6), where left and right columns (offset) =
%C A179542 A006356, and middle column = A006054. n-th iterate of the sequence is
%C A179542 composed of A006356(n) terms parsed into a frequency of 1's, 2's, and 3's
%C A179542 matching the 3-termed vectors with appropriate sums.
%H A179542 P. Steinbach, <a href="http://www.jstor.org/stable/2691048">Golden fields: a case for the heptagon</a>, Math. Mag. 70 (1997), no. 1, 22-31.
%H A179542 <a href="/index/Fi#FIXEDPOINTS">Index entries for sequences that are fixed points of mappings</a>
%e A179542 Starting with 1, the next two iterates are:
%e A179542 (1, 2, 3) -> (1, 2, 3, 1, 2, 1) -> (1, 2, 3, 1, 2, 1, 1, 2, 3, 1, 2, 1, 2, 3).
%e A179542 The 3rd iterate has 14 terms composed of six 1's, five 2's, and three 3's; matching the top row of M^3 = (6, 5, 3), sum = 14 = A006356(3).
%t A179542 NestList[ Flatten[ # /. {1 -> {1, 2, 3}, 2 -> {1, 2}, 3 -> 1}] &, {1}, 5] // Flatten (* _Robert G. Wilson v_, Jul 23 2010 *)
%Y A179542 Cf. A006356, A006054
%K A179542 nonn
%O A179542 0,3
%A A179542 _Gary W. Adamson_, Jul 18 2010
%E A179542 More terms from _Robert G. Wilson v_, Jul 23 2010