|
|
A356937型 |
| 其多集并集大小为n且覆盖正整数初始区间的区间多集数。 |
|
7
|
|
|
1, 1, 3, 9, 29, 94, 310, 1026, 3411, 11360, 37886, 126442, 422203, 1410189, 4711039, 15740098, 52593430, 175742438, 587266782, 1962469721, 6558071499, 21915580437, 73237274083, 244744474601, 817889464220, 2733235019732, 9133973730633, 30524096110942, 102006076541264
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
0,3
|
|
评论
|
像{3,4,5}这样的区间是相邻元素的所有差等于1的集合。
|
|
链接
|
|
|
例子
|
a(1)=1到a(3)=9的集合多部分(集合的多集合):
{{1}} {{1,2}} {{1,2,3}}
{{1},{1}} {{1},{1,2}}
{{1},{2}} {{1},{2,3}}
{{2},{1,2}}
{{3},{1,2}}
{{1},{1},{1}}
{{1},{1},{2}}
{{1},{2},{2}}
{{1},{2},{3}}
|
|
数学
|
allnorm[n_]:=如果[n<=0,{{}},函数[s,数组[Count[s,y_/;y<=#]+1&,n]]/@子集[Range[n-1]+1]];
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]]];
chQ[y_]:=或[Length[y]<=1,并集[Differences[y]]=={1}];
表[Length[Select[Join@@mps/@allnorm[n],And@@chQ/@#&]],{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,最大值(0,1+k-j))}
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
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|