|
|
|
|
#11通过N.J.A.斯隆2017年3月6日星期一17:20:09 EST |
|
|
|
#10通过N.J.A.斯隆2017年3月6日星期一17:20:06 EST |
|
|
|
#9通过N.J.A.斯隆2014年2月23日星期日13:16:28 EST |
|
|
|
#8通过乔瓦尼·雷斯塔2014年2月12日星期三东部标准时间06:46:28 |
|
|
|
#7通过乔瓦尼·雷斯塔2014年2月12日星期三美国东部标准时间06:45:34 |
| 链接
|
Giovanni Resta,<a href=“/A237713型/b237713.txt“>n、a(n)表(n=1..10000)</a>
|
|
|
讨论
|
2月12日星期三
| 06:46
| 乔瓦尼·雷斯塔:我更改了标题,使其与数据更加匹配。
|
|
|
|
#6个通过乔瓦尼·雷斯塔2014年2月12日星期三05:52:11 EST |
| 名称
|
复合数n,以便 不同的n中的数字和 不同的中的数字 并置 属于这个n的真除数是相同的。
|
| 数学
|
选择[范围[10^5]!PrimeQ@#&Union@IntegerDigits@#==Union@@IntegerDigits/@Most@Divisors@#&](*乔瓦尼·雷斯塔2014年2月12日*)
|
| 状态
|
提出
编辑
|
|
|
|
#5通过米歇尔·马库斯2014年2月12日星期三03:44:54 EST |
|
|
|
#4通过米歇尔·马库斯2014年2月12日星期三03:44:46 EST |
| 评论
|
因为1总是n的除数,所以这是A011531号. -米歇尔·马库斯2014年2月12日
|
| 数学
|
Pn[n_]:=排序[DeleteDuplicates[Flatten[IntegerDigits[Take[Divisors[n],DivisorSigma[0,n]-1]]]];Fn[n_]:=排序[DeleteDuplicates[IntegerDigits[n]]];lst={};Do[If[!PrimeQ[n]&&Pn[n]===Fn[n],AppendTo[lst,n]],{n,2,10^5}];第一次
|
| 黄体脂酮素
|
(PARI)isok(n)={my(digs=[]);fordiv(n,d,if(d!=n,digs=concat(diggs,digits(d)))\\米歇尔·马库斯2014年2月12日
|
| 状态
|
提出
编辑
|
|
|
|
#3通过米歇尔·拉格诺2014年2月12日星期三02:41:00 EST |
|
|
|
#2个通过米歇尔·拉格诺2014年2月12日星期三美国东部标准时间02:40:13 |
| 名称
|
分配混合成的 数字 n个 这样的 那个 这个 数字 在里面 n个 和 这个 数字 在里面 并置 属于 适当的 约数 属于 n个 对于是 米歇尔这个 拉尼奥相同的.
|
| 数据
|
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
|
| 示例
|
125在序列中是因为125的适当除数是{1,5,25},其数字与125相同。
|
| 数学
|
Pn[n_]:=排序[DeleteDuplicates[Flatten[IntegerDigits[Take[Divisors[n],DivisorSigma[0,n]-1]]]];Fn[n_]:=排序[DeleteDuplicates[IntegerDigits[n]]];lst={};Do[If[!PrimeQ[n]&&Pn[n]===Fn[n],AppendTo[lst,n]],{n,2,10^5}];第一次
|
| 交叉参考
|
囊性纤维变性。A032741号,A035141号.
|
| 关键词
|
分配
非n,基础
|
| 作者
|
米歇尔·拉格诺2014年2月12日
|
| 状态
|
已批准
编辑
|
|
|
|