%I#4 2017年4月30日22:38:32
%S 1,3,5,7,8,10,12,14,16,18,20,22,24,26,27,29,31,33,35,37,39,41,43,45,
%第47、49、50、52、54、56、58、60、62、64、66、68、69、71、73、75、76、78、80、82、83、85、87页,
%U 89,91,93,95,97,99101102104106108110112114116118单位
%A285592中1的N个位置;补充A285593。
%C猜想:a(n)/n->(1+sqrt(4/5)。
%H Clark Kimberling,n的表,n=1..10000的a(n)</a>
%e作为一个单词,A285568=1010101101…,其中1位于位置1,3,5,7,8。。。
%t s=嵌套[扁平[#/.{0->{1,1},1->{0,1,0}}]&,{0},9](*A285568*)
%t w=StringJoin[Map[ToString,s]]
%t w1=字符串替换[w,{“11”->“1”,“00”->“0”}]
%t ss=ToCharacterCode[w1]-48;(*A285592*)
%t压扁[位置[ss,0]](*A285593*)
%t压扁[位置[ss,1]](*A285594*)
%Y参见A285568、A285592和A285593。
%K nonn,简单
%O 1,2号机组
%A _百灵鸟金伯利,2017年4月30日
|