%I#7 2019年6月19日10:32:21

%S 1,1,1,0,0,1,0,0,0，0,01,0,0，

%T 0,0,0,1,0,0，0,00,0'，0,0，

%U 0,0,0,1,0,0，0,0'，0,0

%N分区标尺

%C a（k）=1，如果k=A000070（n）-1，对于某些n>=0，否则为0。

%这和A134286一样吗_N.J.A.Sloane，2009年2月2日

%e.1、，

%e.1、，

%e、0、1、，

%e、0、1、，

%e、0、0、0,1、，

%t a70[n_]：=a70[n]=分区P[范围[0，n]]//总计；

%t a[k]：=AnyTrue[Range[0，k]，k==a70[#]-1&]//布尔；

%t表[a[k]，{k，0，96}]（*Jean-François Alcover_，2019年6月19日*）

%Y参考A000070、A000041。

%K nonn，标签

%0、1

%A _彼得·卢什尼，2009年1月31日