0,3个

福斯托·A·C·卡里博尼，n=0..80时的n，a（n）表

埃里克·韦斯坦的数学世界，非平均序列

维基百科，算术级数

维基百科，塞勒姆·斯宾塞套装

与非平均序列相关的索引项

b： =proc（n，s）选项记忆`如果`（n<1，1，b（n-1，s）+

‘if`（ormap（s，s中的j->2*j-n），0，b（n-1，s并集{n}）））

结束：

a： =n->b（n-1，{n}）：

顺序（a（n），n=0..23）；

b[n，s_x]：=b[n，s]=如果[n<1，1，b[n-1，s]+

如果[AnyTrue[s，MemberQ[s，2#-n]&]，0，b[n-1，s~联合{n}]]]；

a[n_9]：=b[n-1，{n}]；

a/@范围[0，23](*让·弗朗索瓦·阿尔科弗2021年5月3日，之后海因茨*)

行和A334892型.

部分和给出A051013型.

上下文顺序：A001636号 A347786飞机 A036588号*甲239872 A099517型 A026647号

相邻序列：A334890型 A334891型 A334892型*A334894飞机 A334895型 A334896飞机

不

海因茨2020年5月14日

经核准的