%I#4 2014年5月6日15:07:55
%S 0,0,0,1,3,3,6,8,12,15,23,27,38,68,64,78105127165202256311,
%电话:3934735887118751050128615371867222926873195384544,
%电话:5427641676258981106371249214736172692029323715277923239137840
%N分区数p=[x(1),…,x(k)],其中x(1x(k),n的最大值(x(i)-x(i-1))>=p的零件数。
%F a(n)=A241830(n)+A241832(n)。
%F a(n)+A241828(n)=A000041(n),对于n>=0。
%e a(6)计算这3个分区:51、42、411。
%t z=30;f[n_]:=f[n]=整数分区[n];g[p_]:=最大[-差异[p]]
%t表格[计数[f[n],p_/;g[p]<长度[p]],{n,0,z}](*A241828*)
%t表格[计数[f[n],p_/;g[p]<=长度[p]],{n,0,z}](*A241829*)
%t表格[计数[f[n],p_/;g[p]==长度[p]],{n,0,z}](*A241830*)
%t表格[计数[f[n],p_/;g[p]>=长度[p]],{n,0,z}](*A241831*)
%t表格[计数[f[n],p_/;g[p]>长度[p]],{n,0,z}](*A241832*)
%Y参见A241828、A241829、A241830、A24183、A000041。
%K nonn,简单
%0、7
%A_Clark Kimberling_,2014年4月30日
|