OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A237713型 复合数n,使n中的不同数字和n的适当除数中的不同数相同。 2
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
评论
因为1总是n的除数,所以这是A011531号-米歇尔·马库斯2014年2月12日
链接
乔瓦尼·雷斯塔,n=1..10000时的n,a(n)表
例子
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}];第一次
选择[范围[10^5]!PrimeQ@#&Union@IntegerDigits@#==Union@@IntegerDigits/@Most@Divisors@#&](*乔瓦尼·雷斯塔2014年2月12日*)
黄体脂酮素
(PARI)isok(n)={my(digs=[]);fordiv(n,d,if(d!=n,digs=concat(digs,digits(d)));(n!=1)&&!isprime(n)&&vecsort(digs,8)==vecsort(digits(n),8);}\\米歇尔·马库斯2014年2月12日
交叉参考
囊性纤维变性。A032741号A035141号.
请参见A282755型用于变体。
关键词
非n基础
作者
米歇尔·拉格诺2014年2月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月23日18:59。包含372765个序列。(在oeis4上运行。)