提出

经核准的

编辑

提出

b[0]=1；b[n_]：=b[n]=和[b[n-k]，{k，选择[Range[n]，IntegerQ[Sqrt[#]]&]}]；

a[n]：=b[n^2]；

表[a[n]，{n，0，16}](*Jean-François Alcover公司，2018年6月9日*）

经核准的

编辑

编辑

经核准的

否则为0；对于i，当i^2<=n时，do%+b（n-i^2）od; % fi（菲涅耳）

经核准的

编辑

编辑

经核准的

等于三角形的行和A232266型.

Alois P.Heinz，<a href=“/A224366号/b224366.txt“>n表，n=0..81时为a（n）</a>

b： =proc（n）选项记忆；局部i；如果n=0，则为1

否则为0；对于i，当i^2<=n时，做%+b（n-i^2）od；%fi（菲涅耳）

结束时间：

a： =n->b（n^2）：

seq（a（n），n=0..17）#阿洛伊斯·海因茨2017年8月12日

经核准的

编辑

编辑

经核准的

等于三角形的行和A232266型.

囊性纤维变性。A006456号,A232266型.

经核准的

编辑

编辑

经核准的