A129852-OEIS公司

A129852号

非递减摆动和：与n相加的和的数量，其中的项交替不减少也不增加。

1, 1, 2, 3, 5, 9, 15, 26, 45, 79, 135, 236, 408, 710, 1230, 2137, 3705, 6436, 11165, 19384, 33637, 58391, 101336, 175896, 305284, 529884, 919683, 1596277, 2770576, 4808811, 8346446, 14486644, 25143896, 43641363, 75746646, 131470683, 228188723, 396058740, 687424365, 1193136983, 2070883422 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`0,3`
	链接	`阿洛伊斯·海因茨，n=0..2000时的n，a（n）表`
	例子	`发件人乔格·阿恩特2013年5月21日：（开始）` `a（6）=15这样的成分是` `01: [ 1 1 1 1 1 1 ]` `02: [ 1 1 1 2 1 ]` `03: [ 1 1 1 3 ]` `04: [ 1 2 1 1 1 ]` `05：[1 2 1 2]` `06: [ 1 3 1 1 ]` `07: [ 1 3 2 ]` `08: [ 1 4 1 ]` `09年：[15]` `10: [ 2 2 1 1 ]` `11: [ 2 2 2 ]` `12: [ 2 3 1 ]` `13: [ 2 4 ]` `14: [ 3 3 ]` `15: [ 6 ]` `（结束）`
	MAPLE公司	A129852rec:=proc（part，n）局部asum，a，k；asum:=添加（i，i=部分）；如果asum>n，则返回（0）；elif asum=n，然后返回（1）；否则a:=0；如果nops（part）mod 2=1，则对于从op（-1，part）到n-asum的k，执行a:=a+A129852rec（[op（part，k]，n）；od：对于从1到min的k（op（-1，part），n-asum），执行a:=a+A129852rec（[op（part）），k]，n）；od:fi；返回（a）；fi；结束时间：A129852号：=proc（n）局部a，a1；a:=0；对于从1到n的a1，do a：=a+A2199852rec（[a1]，n）；od：返回（a）；结束：seq(A129852号（n），n=1..20）#R.J.马塔尔2007年10月31日 `#第二个Maple项目：` b： =proc（n，l，t）选项记忆`如果`（n=0，1，添加( b（n-j，j，非t），j=`如果`（t，l.n，1..分钟（n，l））） `结束时间：` `a： =n->b（n$2，错误）：` `seq（a（n），n=0..40）#阿洛伊斯·海因茨2023年5月23日`
	数学	`b[n_，l_，t_]：=b[n，l，t]=如果[n==0，1，和[b[n-j，j，！t]，{j，如果[t，范围[l，n]，范围[Min[n，l]]}]]；` `a[n]：=b[n，n，假]；` `表[a[n]，{n，0，40}](Jean-François Alcover公司2023年5月23日之后阿洛伊斯·海因茨)`
	交叉参考	`囊性纤维变性。A129853号.` `囊性纤维变性。A025048号,A025049号.` `上下文中的序列：A185649号 A005169号 A338192型A367666飞机 A065954号 A067847号` `相邻序列：A129849号 A129850个 A129851号A129853号 A129854号 A129855号`
	关键词	`非n`
	作者	`弗拉德塔·乔沃维奇2007年5月22日`
	扩展	`来自的更多条款R.J.马塔尔2007年10月31日` `来自的更多条款乔格·阿恩特2013年5月21日` `a（0）=1前面加阿洛伊斯·海因茨2023年5月23日`
	状态	`经核准的`