A192180-OEIS公司

A192180型

复合数n，使n的所有数字都出现在素数列表中。

95, 132, 272, 312, 322, 326, 333, 731, 735, 912, 973, 995, 1111, 1212, 1255, 1292, 1972, 2112, 2132, 2232, 2272, 2512, 2672, 2737, 2994, 3171, 3192, 3210, 3212, 3243, 3315, 3393, 3792, 3933, 4172, 4341, 4371, 4383, 5150, 5192, 5271, 6973, 7132, 7210

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

为了达到这个目的，如果一个数字有重复的素数，那么这些素数就会被重复写入。例如，27的因式分解表示为（3，3，3）而不是（3^3）。 -阿隆索·德尔·阿特2011年7月5日

链接

克劳斯·布罗克豪斯，n=1..10000时的n，a（n）表

例子

由于95的素数因式分解是（5,19），并且9和5都出现在（5'19）中，因此数字95在列表上。

由于1255的素因式分解是（5251）和1，2，并且这两个5s都出现在（5251”）中，所以数字1255就在列表中。

22不在列表中，因为它的素因式分解是（2,11），并且没有足够的2s。列表中也没有25，因为对于这个序列，我们将其因子分解表示为（5，5）而不是（5^2）。

数学

选择[Range[2，5000]，Not[PrimeQ[#]]&&Sort[DigitCount[FromDigits[Flatten[IntegerDigits/@Flatten[Table[#1，{#2}]&@@@FactorInteger[#]]]-Digit计数[#][[1]]>=0&](*阿隆索·德尔·阿特，2011年6月28日，基于HomePrimeStep函数埃里克·韦斯特因*)

黄体脂酮素

（岩浆）S:=[]；对于[1..10000]中的n，如果不是IsPrime（n），则u：=Intseq（n）；f:=因子分解（n）；v:=&cat[[1..f[j，2]]中的[f[j、1]：i：[1..#f]]中的j；w:=&cat[Intseq（p）：p in v]；如果对[0..9]中的所有{a:a |多重性（SequenceToMultiset（u），a）le Multisity（Sequence ToMultisetw，a）}，则追加（~S，n）；结束条件：；结束条件：；结束；S//克劳斯·布罗克豪斯2011年7月9日

交叉参考

囊性纤维变性。A037276号.

上下文中的序列：A369342型 A368873型 A074237号*A378950型 A134217号 A039552号

相邻序列：A192177号 A192178 A192179号*A192181号 A192182号 A192183号

关键词

非n,基础

作者

吉尔·布鲁萨德2011年6月24日

状态

经核准的