|
|
A153750型 |
| 数字k,使得k^2中有14个数字,对于14(1,2,7)的每一个因子f,大小为f的数字分组之和是一个平方。 |
|
2
|
|
|
3196200, 3330249, 3330348, 3330480, 3330801, 3331071, 3331367, 3331695, 3331731, 3331758, 3331803, 3331830, 3331860, 3331866, 3331929, 3331995, 3332025, 3332058, 3332061, 3332091, 3332124, 3332127, 3332160, 3332190
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
最后一项是a(266)=9996830-乔瓦尼·雷斯塔2015年6月6日
|
|
链接
|
|
|
例子
|
3331367^2 = 11098006088689;
1+1+0+9+8+0+0+6+0+8+8+6+8+9 = 64 = 8^2;
11+09+80+06+08+86+89 = 289 = 17^2;
1109800+6088689 = 7198489 = 2683^2.
|
|
数学
|
sdgQ[n_]:=模块[{idn=整数位数[n^2],t2,t7},t2=总计[FromDigits/@Partition[idn,2]];t7=总计[FromDigits/@Partition[idn,7]];AllTrue[{Sqrt[总计[idn]],Sqrt[t2],Sqrt[t7]},整数Q]];选择[Range[Round[3.16*10^6],Round[3.34*10^6]],sdgQ](*程序使用Mathematica版本10*中的AllTrue函数)(*哈维·P·戴尔2016年8月7日*)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,最终,满的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|