|
| |
|
| A131069号 |
| 数字n，使得n=sum_digits（a）^sum_digits（b）=a+b，其中a和b为正整数。 |
|
1
|
|
|
|
1, 4, 25, 64, 121, 125, 196, 216, 289, 343, 400, 2744, 3375, 4096, 12167, 13824, 15625, 32768
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
121=119+2->和位数（119）=11；和位数（2）=2->11^2=121。
2744=2741+3->和位数（2741）=14；和位数（3）=3->14^3=2744。
另外，2744=2732+12=2723+21=2714+30=2642+102=2633+111=2624+120=2543+201=2534+210=244+300=2100+644=2010+734=2001+743=1742+1002=1733+1011=1724+1020=1643+1101=1634+1110=1544+1200。
|
|
|
MAPLE公司
|
P： =proc（n）局部a，i，j，k，x，w；对于i从1乘1到n，如果（i mod 1000）=0，则打印（“sono a:”，i）；fi；如果（trunc（i/2））*2=i，则a:=i/2+1；否则a:=（i+1）/2；fi；对于从1到dow的j：=0；k： =i-j+1；当k>0时，do w：=w+k-（trunc（k/10）*10）；k： =trunc（k/10）；od；x： =0；k： =j-1；当k>0时，做x:=x+k-（trunc（k/10）*10）；k： =trunc（k/10）；od；如果（（w^x=i）或（x^w=i）），则打印（i，i-j+1，j-1）；光纤；od；结束：P（10000）；
|
|
|
数学
|
fQ[n_]：=块[{k=0}，而[j=n-k；k<n&&Plus@@IntegerDigits[j]^Plus@@integerDiges[k]！=n、 k++]；k！=n] ；lst={}；做[If[GCD@@Last/@因子整数@n>1&&fQ@n, 打印@n; 附录[lst，n]]，{n，1934880}]；第一次(*罗伯特·威尔逊v*)
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
