%I#24 2020年8月19日07:55:57

%S 6.5,6,5,4,5,6,5、6,5,1,5,5,4、4,3,4,5、5,6,1,5,15,5,14,4,4,1,5，

%温度4,5,4,3,4,4,2,3,4,1,4,5,1,5,3,5,5,6,5,,6,6,2,4,4,15,4,12,3，

%U 4,5,4,5,1,5,6,5,4],5,5,0,6,6,4,6,5，5,6,1,4,4,4

%N代换1->{2，1，2}，2->{3，2，3}，3->{4，3，4}，4->{5，4，5}，5->{6，5，6}，6->{1，6，1}的第5代，从1开始。

%C以前的名字是：Terdragon矩阵对称扩展到6个符号：特征多项式：x^6-6*x^5+15*x^4-20*x^3+15*x^2-6*x-63。

%C此序列为瓷砖提供了一段120度的六角形边框。

%H Jinyuan Wang，n的表，a（n）表示n=0..242</a>

%H F.M.Dekking，<a href=“http://dx.doi.org/10.1016/0001-8708（82）90066-4“>递归集，《数学进展》，第44卷，第1期，1982年4月，第96页，第4.11节。

%F 1->{2，1，2}，2->{3，2，3}，3->{4，3，4}，4->{5，4，5}，5->{6，5，6}，6->{1，6，1}。

%ts[1]={2,1,2}；s[2]={3,2,3}；s[3]={4,3,4}；s[4]={5,4,5}；s[5]={6,5,6}；s[6]={1,6,1}；t[a_]：=压扁[s/@a]；p[0]={1}；p[1]=t[p[0]]；p[n]：=t[p[n-1]]；aa=p[5]

%t压扁[Nest[Flatten[#/.{1->{2，1，2}，2->{3，2，3}，3->{4，3，4}，4->{5，4，5}，5->{6，5，6}，6->{1，6，1}}&]，{5}

%Y参考A105969。

%K nonn，fini，完全

%0、1

%A _Roger L.Bagula_，2005年5月7日

%E来自Joerg Arndt_的新名字，2015年6月17日