|
|
A356942型 |
| 无间隙多集的多集数,其多集并集是覆盖初始区间的大小为n的多集。 |
|
7
|
|
|
1、1、4、15、61、249、1040、4363、18424、78014、331099、1407080、5985505、25477399、108493103、462147381、1969025286、8390475609、35757524184、152398429323、649555719160、2768653475487、11801369554033、50304231997727、21442853885889、9140390405714237
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
0,3
|
|
评论
|
如果一个多集覆盖一个正整数区间,则它是无间隙的。例如,{2,3,3,4}是无间隙的,而{1,1,3,3}则不是。
|
|
链接
|
|
|
例子
|
a(1)=1到a(3)=14个多集分区:
{{1}} {{1,1}} {{1,1,1}}
{{1,2}} {{1,1,2}}
{{1},{1}} {{1,2,2}}
{{1},{2}} {{1,2,3}}
{{1},{1,1}}
{{1},{1,2}}
{{1},{2,2}}
{{1},{2,3}}
{{2},{1,1}}
{{2},{1,2}}
{{3},{1,2}}
{{1},{1},{1}}
{{1},{1},{2}}
{{1},{2},{2}}
{{1},{2},{3}}
|
|
数学
|
sps[{}]:={{}};sps[set:{i_,___}]:=联接@@函数[s,前缀[#,s]和/@sps[Complement[set,s]]/@Cases[子集[set],{i,___}];
mps[set_]:=联合[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]];
allnorm[n_]:=如果[n<=0,{{}},函数[s,数组[Count[s,y_/;y<=#]+1&,n]]/@子集[Range[n-1]+1]];
nogapQ[m_]:=或[m=={},联合[m]==范围[Min[m],最大[m]]];
表[Length[Select[Join@@mps/@allnorm[n],And@@nogapQ/@#&]],{n,0,5}]
|
|
黄体脂酮素
|
(PARI)
EulerT(v)={Vec(exp(x*Ser(dirmul(v,vector(#v,n,1/n)))-1,-#v)}
R(n,k)={EulerT(向量(n,j,sum(i=1,min(k,j),(k-i+1)*二项式(j-1,i-1)))}
seq(n)={my(A=1+O(y*y^n));对于(k=1,n,A+=x^k*(1+y*Ser(R(n,k),y)-polcoef(1/(1-x*A)+O(x^(k+2)),k+1));Vec(subst(A,x,1))}\\安德鲁·霍罗伊德2023年1月1日
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|