129853年

A129853号

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

1, 1, 2, 3, 6, 9, 17, 28, 50, 85, 149, 257, 448, 775, 1347, 2336, 4057, 7038, 12219, 21204, 36807, 63880, 110878, 192442, 334020, 579739, 1006237, 1746482, 3031310, 5261324, 9131892, 15849876, 27510049, 47748159, 82874713, 143842547, 249662173, 433329337, 752113633, 1305415658, 2265761441 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`0,3`
	链接	`阿洛伊斯·海因茨，n=0..2000时的n，a（n）表`
	例子	`a（4）=6与4相加的和是4、3+1、2+2、2+1+1、1+1+2和1+1+1+1。2=2^（n-1）-a（n）和1+2+1和1+3不满足标准，不计数。` `发件人乔格·阿恩特2013年5月21日：（开始）` `a（6）=17这样的成分是` `01: [ 1 1 1 1 1 1 ]` `02: [ 1 1 1 1 2 ]` `03:[1 1 2 1 1]` `04: [ 1 1 2 2 ]` `05: [ 1 1 3 1 ]` `06: [ 1 1 4 ]` `07: [ 2 1 1 1 1 ]` `08: [ 2 1 2 1 ]` `09: [ 2 1 3 ]` `10: [ 2 2 2 ]` `11: [ 3 1 1 1 ]` `12: [ 3 1 2 ]` `13: [ 3 3 ]` `14: [ 4 1 1 ]` `15: [ 4 2 ]` `16: [ 5 1 ]` `17: [ 6 ]` `（结束）`
	MAPLE公司	A129853rec:=proc（part，n）局部asum，a，k；asum:=添加（i，i=部分）；如果asum>n，则返回（0）；elif asum=n，然后返回（1）；否则a:=0；如果nops（part）mod 2=0，则对于从op（-1，part）到n-asum的k，执行a:=a+A129853rec（[op（part，k]，n）；od：对于从1到min的k（op（-1，part），n-asum），执行a:=a+A129853rec（[op（part）），k]，n）；od:fi；返回（a）；fi；结束时间：A129853号：=proc（n）局部a，a1；a:=0；对于从1到n的a1，做a:=a+A129853rec（[a1]，n）；od：返回（a）；结束：seq(A129853号（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，1，真）：` `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，1，真]；` `表[a[n]，{n，0，40}](Jean-François Alcover公司，2023年8月16日，之后阿洛伊斯·海因茨)`
	交叉参考	`囊性纤维变性。A129852号。` `囊性纤维变性。A025048号,A025049号。` `上下文中的序列：A048815号 A074045号 A073776号A095982号 A095090型 A061947号` `相邻序列：A129850个 A129851号 A129852号A129854号 A129855号 129856英镑`
	关键词	`非n`
	作者	`弗拉德塔·乔沃维奇2007年5月22日`
	扩展	`更多术语来自R.J.马塔尔2007年10月31日` `更多术语来自乔格·阿恩特2013年5月21日` `a（0）=1前面加阿洛伊斯·海因茨，2023年5月23日`
	状态	`经核准的`