%I#6 2020年4月7日21:16:11
%S 0,0,1,1,0,1,0,0,1,0,1,1,1,1,0,01,0,1,1,1,0,10,1,0,
%温度1,0,1,0,1,0,1,0,1,1,0,
%U 0,1,0,1,0,1,0,1,0,0,1,1,0,0,1,0,1,1,1,0
%N映射的不动点00->001,1->101,从00开始。
%C猜想:A132045给出了映射第n次迭代中的字母数(0和1)。
%H Clark Kimberling,n的表,n=1..10000的a(n)</a>
%e迭代,从00开始:
%第00页
%电子001
%电子001101
%电子0011011010101
%电子0011011010101101010101010101
%电话:001101101010110101010101010101101101010101011010101010010101010101
%ts={0,0};w[0]=StringJoin[Map[ToString,s]];
%t w[n_]:=字符串替换[w[n-1],{“00”->“001”,“1”->“101”}]
%t表[w[n],{n,0,8}]
%t st=字符代码[w[11]]-48(*A286807*)
%t压扁[位置[st,0]](*A286808*)
%t压扁[位置[st,1]](*A286809*)
%t表[StringLength[w[n]],{n,1,35}](*A132045推测*)
%Y参考A286808、A286809、A132045。
%K nonn,简单
%O 1号机组
%A_Clark Kimberling_,2017年6月5日
|