登录

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

 

提示 （来自的问候整数序列在线百科全书!) A238433型 n的分区数避免等距三项算术级数。 5 1, 1, 2, 2, 4, 5, 6, 8, 13, 12, 19, 23, 29, 35, 45, 52, 68, 80, 98, 111, 141, 163, 198, 230, 283, 320, 376, 443, 517, 585, 719, 799, 932, 1085, 1254, 1417, 1668, 1861, 2138, 2449, 2804, 3166, 3666, 4083, 4662, 5277, 5960, 6676, 7651, 8494, 9635, 10803, 12157 (列表;图表;参考;听;历史;文本;内部格式) 抵消 0,3 链接 福斯托·A·C·卡里博尼，n=0..300时的n，a（n）表（条款0..150来自Joerg Arndt和Alois P.Heinz） 例子 a（8）=13这样的分区是： 01: [ 1 1 2 4 ] 02: [ 1 1 3 3 ] 03: [ 1 1 6 ] 04: [ 1 2 2 3 ] 05: [ 1 2 5 ] 06: [ 1 3 4 ] 07: [ 1 7 ] 08: [ 2 2 4 ] 09: [ 2 3 3 ] 10: [ 2 6 ] 11: [ 3 5 ] 12:[44] 13: [ 8 ] 请注意，第四个分区具有算术级数1、2、3，但不在等距位置。 MAPLE公司 b： =proc（n，i，l）局部j； 对于从2到iquo的j（nops（l）+1，2）do 如果l[1]-l[j]=l[j]-l[2*j-1]，则返回0 fiod； `如果`（n=0，1，`如果`（i<1，0，b（n，i-1，l）+ `如果`（i>n，0，b（n-i，i，[i，l[]]）） 结束时间： a： =n->b（n，n，[]）： seq（a（n），n=0..40）； 数学 b[n_，i_，l_]：=b[n，i，l]=模[{j}，对于[j=2，j<=商[Length[l]+1，2]，j++，如果[l[[1]]-l[j]]==l[[j]]-l[[2*j-1]]，返回[0]]]；如果[n==0，1，如果[i<1，0，b[n，i-1，l]+如果[i>n，0，b[n-i，i，前缀[l，i]]]]； a[n]：=b[n，n，{}]； 表[a[n]，{n，0，40}](*Jean-François Alcover公司，2018年5月21日，翻译自枫叶*） 交叉参考 囊性纤维变性。A238432型（成分相同）。 囊性纤维变性。A238571型（避免任何三项算术级数的分区）。 囊性纤维变性。A238424型（分区避免算术级数中的三个连续部分）。 囊性纤维变性。A238687型. 上下文中的序列：A325874型 A293957型 A238687型*A238424型 A121269号 A211860型 相邻序列：A238430型 238431英镑 A238432型*A238434型 A238435型 A238436型 关键词 非n 作者 乔格·阿恩特和阿洛伊斯·海因茨2014年3月1日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年5月1日13:18。包含372172个序列。（在oeis4上运行。）