OEIS哀悼西蒙斯并感谢西蒙斯基金会对包括OEIS在内的许多科学分支研究的支持。
登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A289501型 权重为n的富集p-树的数量。 83
1, 1, 2, 4, 12, 32, 112, 352, 1296, 4448, 16640, 59968, 231168, 856960, 3334400, 12679424, 49991424, 192890880, 767229952, 2998427648, 12015527936, 47438950400, 191117033472, 760625733632, 3082675150848, 12346305839104, 50223511928832, 202359539335168 (列表图表参考历史文本内部格式)
抵消
0,3
评论
权重为n的富集p-树是(情况1)数字n本身,或(情况2)两个或多个富集p-树序,其权重总和为n的弱递减序列。
链接
阿洛伊斯·海因茨,n=0..1588时的n、a(n)表
配方奶粉
O.g.f.:(1/(1-x)+产品{i>0}1/(1-a(i)*x^i))/2。
例子
a(4)=12富集p-树为:
4,
(31), ((21)1), (((11)1)1), ((111)1),
(22), (2(11)), ((11)2), ((11)(11)),
(211), ((11)11),
(1111).
MAPLE公司
b: =proc(n,i)选项记忆`如果`(n=0,1,
`如果`(i<1,0,b(n,i-1)+a(i)*b(n-i,min(n-i、i)))
结束时间:
a: =n->`如果`(n=0,1,1+b(n,n-1)):
seq(a(n),n=0..30)#阿洛伊斯·海因茨2017年7月7日
数学
a[n_]:=a[n]=1+总和[Times@@a/@y,{y,Rest[IntegerPartitions[n]]}];
数组[a,20]
(*第二个程序:*)
b[n_,i_]:=b[n,i]=如果[n=0,1,
如果[i<1,0,b[n,i-1]+a[i]b[n-i,Min[n-i、i]]];
a[n_]:=如果[n==0,1,1+b[n,n-1]];
a/@范围[0,30](*Jean-François Alcover公司2021年5月9日之后阿洛伊斯·海因茨*)
黄体脂酮素
(PARI)seq(n)={my(v=向量(n));对于(n=1,n,v[n]=1+polcoef(1/prod(k=1,n-1,1-v[k]*x^k+O(x*x^n)),n)));concat([1],v)}\\安德鲁·霍罗伊德2018年8月26日
交叉参考
关键词
非n
作者
古斯·怀斯曼2017年7月7日
状态
经核准的

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

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

上次修改时间:2024年6月15日05:55 EDT。包含373402个序列。(在oeis4上运行。)