%I#7 2017年6月22日14:17:47

%S 2,3,4,5,7,8,9,11,12,14,16,17,18,19,21,23,24,25,26,27,29,30,31,33,34，

%电话：36,38,39,40,42,43,44,45,47,48,50,52,53,54,55,56,58,60,61,62,63,65,66，

%U 67、69、70、72、74、75、76、77、79、81、82、83、84、85、87、89、90、91

%A288220中N个0位置；补充A288222。

%C猜想：a（n）/n->1.38…，如果m表示这个数，那么当n>=1时，-1<m-a（n，n）/n）<1。

%H Clark Kimberling，n的表，n的a（n）=1..10000</a>

%ts={0,0}；w[0]=StringJoin[Map[ToString，s]]；

%t w[n_]：=字符串替换[w[n-1]，{“00”->“1000”，“10”->“010”}]

%t表[w[n]，{n，0，8}]

%t st=角色代码[w[22]]-48（*A288220*）

%t压扁[位置[st，0]]（*A288221*）

%t压扁[位置[st，1]]（*A288222*）

%Y参见A288220、A288222。

%K nonn，简单

%O 1,1号机组

%A_Clark Kimberling_，2017年6月19日