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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A241828号 分区数p=[x(1),…,x(k)],其中x(1x(k),n的最大值(x(i)-x(i-1))<p的零件数。 5

%I#4 2014年5月6日15:07:20

%S 1,1,2,3,4,6,8,12,16,22,30,41,54,74,97128167219280363462590,

%电话:7469441182148518482299284335154318530564824962311688,

%电话:1413917093205882476929713356024253750769604397186585265101039

%N分区数p=[x(1),…,x(k)],其中x(1x(k),n的最大值(x(i)-x(i-1))<p的零件数。

%C对于n的分区[n],“max(x(i)-x(i-1))”(在Mathematica程序中)解释为0。

%F a(n)=A241826(n)-A241825(n)。

%F a(n)+A241823(n)+A241825(n)=A000041(n),对于n>=0。

%e a(6)统计这8个分区:6、33、321、3111、222、2211、21111、111111。

%tz=30;f[n_]:=f[n]=整数分区[n];g[p_]:=最大[-差异[p]]

%t表格[计数[f[n],p_/;g[p]<长度[p]],{n,0,z}](*A241828*)

%t表格[计数[f[n],p_/;g[p]<=长度[p]],{n,0,z}](*A241829*)

%t表格[计数[f[n],p_/;g[p]==长度[p]],{n,0,z}](*A241830*)

%t表格[计数[f[n],p_/;g[p]>=长度[p]],{n,0,z}](*A241831*)

%t表格[计数[f[n],p_/;g[p]>长度[p]],{n,0,z}](*A241832*)

%Y参见A241829、A241830、A24183、A24182、A000041。

%K nonn,简单

%0、3

%A_Clark Kimberling_,2014年4月30日

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

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

上次修改时间:美国东部夏令时2024年4月19日09:23。包含371782个序列。(在oeis4上运行。)