搜索： a307735-编号：a307738
|
| |
| |
|
|
|
0、1、10、35、100、152、350、377、452、539、709、1000、1299、1398、1439、1519、1520、1569、1591、1679、1965、2599、2838、3332、3500、3598、3770、4520、4586、4754、4854、5390、5501、5835、5857、6388、6595、6735、6861、6951、7090、7349、7887、8395、9795、10000、10056、10159、10389、11055、11091、12990、12999
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
如果k在序列中，那么k*10^r也是，r>=1。
|
|
|
链接
|
|
|
|
例子
|
377^2 = 142129,A003132号(377) = 3^2 + 7^2 + 7^2 = 107,A003132号(142129) = 1^2 + 4^2 + 2^2 + 1^2 + 2^2 + 9^2 = 107.
|
|
|
MAPLE公司
|
过滤器：=proc（n）局部t；
加法（t^2，t=转换（n，基数，10））=加法（t ^2，t=转换（n^2，基数，0））
结束进程：
|
|
|
数学
|
digSum[n_]：=总计[整数位数[n]^2]；选择[Range[0，13000]，digSum[#]==digSum[#^2]&](*阿米拉姆·埃尔达尔2019年8月22日*）
|
|
|
黄体脂酮素
|
（PARI）对于（i=0，30000，如果（norml2（数字（i^2））==norml1（数字（i）），打印1（i，“，”））
（Python）
s=0
当n>0时：
s、 n=s+（n%10）**2，n//10
返回s
n、 a=0，0
当n<50时：
n=n+1
打印（n，a）
（Magma）[0]cat[1..13000]中的[k:k |&+Intseq（k）中的[c^2:c eq&+Intseq（k^2）中的[c^2:c]]//马吕斯·A·伯蒂2019年8月24日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
0, 1, 10, 74, 100, 740, 1000, 3488, 7400, 10000, 23658, 30868, 34880, 47508, 48517, 52187, 58947, 59468, 67685, 68058, 74000, 76814, 78368, 78845, 84878, 100000, 108478, 145877, 149217, 163871, 179685, 186884, 188647, 218977, 219878, 236580, 238758, 248967, 278638, 292597, 308680
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
如果k在序列中，那么k*10^r也是，r>=1。
|
|
|
链接
|
|
|
|
例子
|
74^3 = 405224,A003132号(74) = 7^2 + 4^2 = 65,A003132号(405224) = 4^2 + 0^2 + 5^2 + 2^2 + 2^2 + 4^2 = 65.
|
|
|
数学
|
digSum[n_]：=总数[整数位数[n]^2]；选择[范围[0，310000]，digSum[#]=digSum[#^3]&](*阿米拉姆·埃尔达尔2019年8月22日*）
|
|
|
黄体脂酮素
|
（PARI）对于（i=0，400000，如果（normal2（数字（i^3））==normal1（数字（i）），打印1（i，“，”））
（Magma）[0]cat[1..310000]中的k:k |&+Intseq（k）中的[c^2:c eq&+Intseq（k^3）中的[c^2:c]]//马吕斯·A·伯蒂2019年8月26日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.015秒内完成
|
