登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:a335942
显示1-1,共找到1个结果。 第页1
    排序:关联|参考文献||被改进的|已创建     格式:长的|短的|数据
A335942型 n的组成数,使得部分集和重数集满足s={1..max(s)}。 +0
4
1、1、2、2、3、12、32、51、144、191、486、679、1487、3149、5909、11637、18630、36928、76431、141009、264784、535057、921105、1774022、3388054、6303519、12255373、22527578、43358822、77695383、145170435、264722429、527776034、93638336、1807344134 (列表;图表;参考;;历史;文本;内部格式)
偏移
0.3
链接
柴华武,n=0..142时的n,a(n)表(Alois P.Heinz提供的n=0..100)
例子
a(4)=3:211121112。
a(5)=12:23、32、113、122、131、212、221、311、1112、1121、1211、2111。
MAPLE公司
b: =proc(n,i,s,p)选项记住;
`如果`(n=0,`if`(s={$0..max(s)},p!,0),`if`(i<1,0,添加(
b(n-i*j,i-1,{s[],j,`如果`(j=0,0,i)},p+j)/j!,j=0..n/i))
结束时间:
a: =n->b(n,楼层((sqrt(1+8*(n+1))-1)/2),{0},0):
seq(a(n),n=0..35);
数学
b[n,i,s,p]:=b[n、i、s、p]=
如果[n==0,如果[s==Range[0,Max[s]],p!,0],如果[i<1,0,总和[
b[n-i*j,i-1,扁平接头@{s,j,如果[j==0,0,i]},p+j]/j!,
{j,0,n/i}]];
a[n_]:=b[n,楼层[(Sqrt[1+8*(n+1)]-1)/2],{0},0];
表[a[n],{n,0,35}](*Jean-François Alcover公司2022年5月30日之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A107429号,A329741型,A335941型.
关键词
非n
作者
阿洛伊斯·海因茨2020年6月30日
状态
经核准的
第页1

搜索在0.004秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年4月18日20:26。包含371781个序列。(在oeis4上运行。)