%I#16 2020年11月24日16:39:44

%S 1,0,0,0,0,0,0,1,1,1,1,1,1,1,2,3,4,5,5,6,6,8,10,11,11,13，

%电话：14,17,18,21,23,26,29,33,36,41,46,51,57,64,71,79,88,97109120133，

%电话：147164180200220244268297325360395437752633693761832913

%N将N划分为不同部分的分区数>=8。

%H Alois P.Heinz，n的表格，n=0..1000时的a（n）</a>

%F a（n）=A026828（n+7）_R.J.Mathar，2008年7月31日

%F G.F.：乘积_{j>=8}（1+x^j）。-_R.J.Mathar，2008年7月31日

%F G.F:和{k>=0}x ^（k*（k+15）/2）/产品{j=1..k}（1-x^j）.-_伊利亚·古特科夫斯基，2020年11月24日

%p b:=proc（n，i）选项记忆；

%p `if`（n=0，1，`如果`（（i-7）*（i+8）/2<n，0，

%p加（b（n-i*j，i-1），j=0..分钟（1，n/i））

%p端：

%pa:=n->b（n$2）：

%p序列（a（n），n=0..100）；#_Alois P.Heinz，2014年2月7日

%t d[n_]：=选择[Integer Partitions[n]，最大[Length/@Split@#]==1&&Min[#]>=8&]；表[d[n]，{n，20}]（*严格分区，部分>=8*）

%t表[长度[d[n]]，{n，40}]（*A025153表示n>=1*）

%t（*_百灵金伯利，2014年3月7日*）

%Y参考A025147。

%K nonn公司

%O 0,18号

%百灵鸟金伯利_