|
|
A240127型 |
| n的分区数,使得各部分的平方和为平方。 |
|
2
|
|
|
1, 1, 1, 2, 2, 1, 3, 3, 3, 5, 5, 6, 10, 9, 10, 17, 20, 18, 31, 34, 38, 52, 62, 65, 98, 108, 113, 160, 190, 204, 271, 322, 352, 448, 533, 572, 757, 863, 956, 1208, 1401, 1555, 1931, 2242, 2499, 3034, 3527, 3938, 4772, 5529, 6108, 7368, 8524, 9478, 11301
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
链接
|
|
|
例子
|
a(12)对这6个分区进行计数:[12]、[5,2,2,1,1,1]、[4,4,1,1,1]、[4,3,3,1,1],[3,3,3]、[2,2,1,1,1,1,1,1,1,1,1]。
|
|
数学
|
f[x_]:=x^(1/2);z=26;ColumnForm[t=Map[Select[Integer partitions[#],IntegerQ[f[Total[#^2]]&]&,Range[z]](*显示分区*)
t2=映射[Length[Select[Integer Partitions[#],IntegerQ[f[Total[#^2]]&]]&,Range[40]](*A240127型*) (*彼得·J·C·摩西2014年4月1日*)
|
|
黄体脂酮素
|
(PARI)a(n)=本人;对于部分(v=n,s+=发行方(总和(i=1,#v,v[i]^2));秒\\查尔斯·格里特豪斯四世2017年3月6日
|
|
交叉参考
|
|
|
关键字
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|