|
|
A282755型 |
| 对k进行编号,使k的所有十进制数字集与k的适当除数的所有十进位数字集相同。 |
|
1
|
|
|
11, 125, 1255, 2510, 11009, 11099, 11255, 11379, 12326, 12955, 14379, 14397, 15033, 15303, 16325, 17482, 21109, 25105, 31007, 31503, 33011, 35213, 37127, 37921, 41303, 44011, 49319, 51367, 53491, 63013, 69413, 70319, 71057, 72013, 72517, 74341, 77011, 81767
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
除了11、125、2510、16325、21109、72013、126530、132644、163025…之外,序列中的大多数数字都是半素数(因此有3个适当的除数)。。。适当除数1、3、7、5、7、7、七、五、五、5、七、七。。。
序列的偶数比奇数少:2510、12326、17482、105002、123206。。。
|
|
链接
|
|
|
例子
|
16325在序列中,因为数字集是E={1,2,3,5,6},16325的适当除数(或等分部分)是具有相同数字集的1、5、25、653和3265。
|
|
MAPLE公司
|
带有(数字理论):
对于从1到200000的n,do:
z: =转换(n,基数,10):n0:=nops(z):lst1:={op(z),z[n0]}:
x: =除数(n):n1:=nops(x):lst:={}:
对于从1到n1-1的m,do:
y: =转换(x[m],基数,10):n2:=nops(y):
lst2:={op(y),y[n2]}:lst:=lst联合lst2
日期:
如果lst1=lst,则
打印f(`%d,`,n):
其他的
图1:
日期:
|
|
数学
|
选择[Range[10^5],Function[k,Union@Flatten@Map[IntegerDigits,Most@Divisors@k]==Union@IntegerDigits@k]](*迈克尔·德弗利格2017年2月25日*)
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|