A240861-OEIS公司

A240861型

划分为不同部分的分区数p of n，不包括部分数。

1, 0, 1, 1, 2, 2, 2, 4, 4, 5, 6, 9, 10, 12, 14, 18, 22, 26, 30, 36, 42, 51, 60, 70, 81, 94, 110, 128, 148, 172, 198, 226, 260, 298, 342, 390, 446, 508, 577, 654, 742, 840, 951, 1074, 1212, 1366, 1538, 1728, 1940, 2176, 2440, 2732, 3056, 3416, 3814, 4254

(列表;图表;参考;听;历史;文本;内部格式)

抵消

0, 5

链接

阿洛伊斯·海因茨，n=0..4000时的n，a（n）表

配方奶粉

a（n）=A000009号（n）-A240855型（n）。

例子

a（10）计算这6个分区：{10}、{9,1}、}7,3}、[2,2,1}、[6,4]、[5,4,1}。

MAPLE公司

g： =proc（n）选项记忆`如果`（n=0，1，加上（g（n-j）*add(

`如果`（d:：奇数，d，0），d=numtheory[除数]（j）），j=1..n）/n）

结束时间：

b： =proc（n，i，p）选项记忆`如果`（i*（i+1）/2<n，0，

`如果`（n=0，[x^p，0]，（f->[add（coff（f[1]，x，j）*x^j

，j=i+1..度（f[1]），f[2]+系数（f[1]，x，i）]）(

b（n-i，最小值（n-i、i-1）、p+1）+b（n、i-1、p））

结束时间：

a： =n->g（n）-b（n$2，0）[2]：

seq（a（n），n=0..55）#阿洛伊斯·海因茨，2024年3月14日

数学

z=40；f[n]：=f[n]=选择[IntegerPartitions[n]，最大[Length/@Split@#]==1&]；

表[计数[f[n]，p_/；成员Q[p，长度[p]]]，{n，0，z}](*A240855型*)

表[Count[f[n]，p_/！成员Q[p，长度[p]]]，{n，0，z}](*A240861型*)

交叉参考

囊性纤维变性。A000009号,A240855型.

上下文中的序列：A282562型 A035682美元 A054543号*A029046号 A035372号 A035576号

相邻序列：A240858型 A240859型 A240860型*A240862型 A240863型 A240864型

关键词

非n,容易的

作者

克拉克·金伯利2014年4月14日

扩展

a（0）更改为1阿洛伊斯·海因茨，2024年3月14日

状态

经核准的