登录
搜索: 编号:a118470
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
数字k,其中数字和(k)+数字和(k^2)+数字(k^3)=数字和(k^4)。
+0
1
0, 162, 171, 351, 468, 558, 1620, 1710, 2106, 3321, 3510, 4023, 4680, 5121, 5247, 5544, 5580, 5868, 8001, 10008, 10071, 10224, 10305, 10503, 10818, 11025, 11241, 11511, 12321, 12654, 12888, 13239, 14004, 14301, 15471, 15876, 16011, 16200, 16218, 17100
抵消
1,2
评论
如果x是一个项,那么10*x也是-迈克尔·布拉尼基2021年12月25日
链接
J.W.L.(Jan)埃兰,n=1..3721时的n,a(n)表(所有条款<10^7)
例子
162是一个术语,因为s(162)=9,s(162^2)=18,s(161^3)=27,s(62^4)=54和9+18+27=54。
数学
选择[Range[0,20000],Sum[i*(DigitCount[#][[i]]+DigitCoont[#^2][[i]]+DigetCount[#^3][[i]]),{i,1,9}]=总和[i*数字计数[#^4][i],{i、1、9}]&](*斯特凡·斯坦纳伯格2006年5月4日*)
s[n_]:=加@@整数位数@n; 选择[Range[0,16217],s@#+s[#^2]+s[#^3]==s[##^4]&](*罗伯特·威尔逊v2006年5月4日*)
并行[While[True,If[Total[Integer Digits[n]]+Total[Cinteger Diges[n^2]]+Toll[CintegerDigits[Cn^3]]==Total[整数位数[n^4],打印[n]];n++];n)(*J.W.L.(一月)埃兰2021年12月25日*)
黄体脂酮素
(PARI)是(n)=我的(s=总和);s(n)+s(n^2)+s\\安德斯·赫尔斯特罗姆2015年9月16日
(PARI)选择(isA118470(n)={和位数(n)+和位数(n^2)+和数(n^3)==和位数(n^4)},[0..1000])\\J.W.L.(一月)埃兰2021年12月25日
(Python)
def-sd(n):返回和(map(int,str(n)))
def-ok(n):返回sd(n)+sd(n**2)+sd(n**3)==sd(n**4)
打印([k表示范围(20000)内的k,如果ok(k)])#迈克尔·布拉尼基2021年12月25日
交叉参考
关键词
非n,基础
作者
Luc Stevens(lms022(AT)yahoo.com),2006年5月4日
扩展
更多术语来自约书亚·祖克2006年5月11日
状态
经核准的

搜索在0.004秒内完成