%I#4 2017年5月17日11:34:32

%S 1,2,4,5,8,9,12,13,15,16,19,20,23,24,26,27,30,31,34,35,38,39,41,42,45，

%电话：46,49,50,52,53,56,57,60,61,64,65,67,68,71,72,75,76,78,79,82,83,86,87，

%U 89,90,93,94,97,98101102104105108112113115116单位

%A286804中N位为0；补充A286806。

%对于n>=2和a（n）/n->（6+sqrt（2））/4，C（n）-a（n-1）在{1,2,3}中。

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

%e作为一个单词，A286804=0010011001100100110011001100110011…，其中0位于位置1、2、4、5、8、9，。。。

%t s=嵌套[扁平[#/.{0->{0，0，1}，1->{0}}]&，{0}，16]；（*佩尔字，A171588*）

%t w=StringJoin[Map[ToString，s]]；

%t w1=字符串替换[w，{“000”->“”}]；

%t st=ToCharacterCode[w1]-48；（*286804*）

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

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

%Y参考A171588、A286804和A286806。

%K nonn，简单

%O 1,2号机组

%A _百灵金伯利，2017年5月16日