|
| |
|
| 100499年1月 |
| 最小的立方体，即n个正方形的和。 |
|
1
|
|
|
|
1, 8, 27, 27, 8, 27, 27, 8, 27, 27, 27, 27, 27, 64, 27, 27, 64, 27, 27, 64, 27, 64, 64, 27, 64, 64, 27, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 125, 64, 64, 125, 64, 64, 125, 64, 125, 125, 64, 125, 125, 64, 125, 125, 125, 125
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
对于[k^3+1，（k+1）^3]中的n，a（n）可能是（k+1，^3）或（k+2）^3。Mathematica代码使用回溯查找每个n的最小立方体-T.D.诺伊2005年1月3日
|
|
|
链接
|
|
|
|
例子
|
以下是初始解：立方体={其平方和为最小立方体的n个数字的列表}：
1 = {1}
8 = {2, 2}
27 = {1, 1, 5}
27 = {1, 1, 3, 4}
8 = {1, 1, 1, 1, 2}
27 = {1, 1, 1, 2, 2, 4}
27 = {1, 1, 2, 2, 2, 2, 3}
8 = {1, 1, 1, 1, 1, 1, 1, 1}
27 = {1, 1, 1, 1, 1, 1, 1, 2, 4}
|
|
|
数学
|
$RecursionLimit=1000；try2[lev_]：=模块[{t，j，ss}，ss=Plus@@（取[soln，lev-1]^2）；如果[lev>n，如果[ss<=sumMax&&IntegerQ[ss^（1/3）]&&ss<minSum，minSum=ss；bestSoln={ss，soln}]，如果[lev==1，t=1，t=soln[[lev-1]]]；j=t；而[ss+（n-lev+1）*j^2<=sumMax，soln[[lev]]=j；try2[lev+1]；soln[[lev]]=t；j++]]]；表[minSum=无限；bestSoln={}；sumMax=（上限[n^（1/3）]+1）^3；soln=表[1，{n}]；try2[1]；最佳解[[1]]，｛n，100｝]
|
|
|
交叉参考
|
|
|
|
关键词
|
容易的,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
