%I#4 2014年4月3日03:40:22
%S 1,0,1,1,3,3,6,8,12,16,23,32,42,58,74102131170220283359462579,
%电话7279221136142417632183266733084019491759827285877410666,
%电话:127971543718505221812648131678376494477353177629947446688014
%N N的分区数,不包含作为一部分的不同部分的数量。
%F a(n)+A239945(n)=A000041(n),对于n>=0。
%e a(7)统计这8个分区:7、61、511、43、421、4111、331、31111。
%tz=55;d[p_]:=d[p]=长度[删除重复项[p]];表[Count[Integer Partitions[n],p_/;成员Q[p,d[p]]],{n,0,z}](*A239945*)
%t表[PartitionsP[n]-t[[n+1]],{n,0,z}](*A239946*)
%Y参考A239945。
%K nonn,简单
%0、5
%2014年3月30日,金伯利百灵
|