登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

请做一个捐赠让OEIS继续运行。我们现在已经56岁了。在过去的一年里,我们增加了10000个新序列,达到了近9000个引用(通常说“感谢OEI的发现”)。
其他方式捐赠

提示
(问候来自整数序列在线百科全书!)
A237713号 使n中的不同位数和n的真除数中的不同位数相同的复合数n。 2
1251255、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

评论

因为1总是n的除数,所以这是A011531号. -米歇尔·马库斯2014年2月12日

链接

乔瓦尼·雷斯塔,n=1..10000的n,a(n)表

例子

125在序列中,因为125的真除数是{1,5,25},其位数与125相同。

数学

Pn[n\]:=Sort[DeleteDuplicates[Flatten[IntegerDigits[Take[Divisors[n],DivisorSigma[0,n]-1]]]]];Fn[n_u]:=Sort[DeleteDuplicates[IntegerDigits[n]]];lst={};Do[If[!PrimeQ[n]&&Pn[n]==Fn[n],附加到[lst,n]],{n,2,10^5}];lst

选择[范围[10^5]!PrimeQ@&&Union@IntegerDigits@@==Union@@整数位数/@Most@除数@&](*乔瓦尼·雷斯塔2014年2月12日*)

黄体脂酮素

(PARI)isok(n)={my(digs=[]);fordiv(n,d,if(d!=n,digs=concat(digs,digs(d)));(n!=1)&&!isprime(n)&&vecsort(digs,8)==向量排序(数字(n),8);}\\马库斯·米歇尔2014年2月12日

交叉引用

囊性纤维变性。A032741号,A035141号.

看到了吗A282755号对于一个变体。

上下文顺序:A016851号 A204795号 A243240*A000526号 A016971号 A030082号

相邻序列:A237710 A237711号 A237712号*A237714号 A237715号 A237716号

关键字

,基础

作者

米歇尔·拉格诺2014年2月12日

状态

经核准的

查找|欢迎光临|维基|登记|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索者|最近
OEIS社区|维护人OEIS基金公司。

许可协议,使用条款,隐私政策。.

上次修改时间:美国东部时间2020年11月27日08:46。包含338679个序列。(运行在oeis4上。)