|
| |
|
| A120383号 |
| 如果满足以下条件，则包括数字n：m除以n表示所有m，其中第m个素数除以n。 |
|
50
|
|
|
|
1, 2, 4, 6, 8, 12, 16, 18, 24, 28, 30, 32, 36, 48, 54, 56, 60, 64, 72, 78, 84, 90, 96, 108, 112, 120, 128, 144, 150, 152, 156, 162, 168, 180, 192, 196, 216, 224, 234, 240, 252, 256, 270, 288, 300, 304, 312, 324, 330, 336, 360, 384, 390, 392, 414, 420, 432, 444, 448
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
如果n在序列中，那么2*n也在序列中。
a（2）=2是序列中唯一的质数。
a（1）=1是序列中唯一的奇数。
（结束）
可被所有素数指数整除的数。n的素数索引是一个数字m，素数（m）除以n。例如，78的素数指数=素数（1）*素数（2）*素素（6）是{1,2,6}，所有这些素数都除以78，所以78在序列中-古斯·怀斯曼2019年3月23日
|
|
|
链接
|
|
|
|
例子
|
28 = 2^2 * 7. 2是第一素数，7是第四素数。由于1和4都除以28，因此28被包括在序列中。
78 = 2 * 3 * 13. 2是第一素数，3是第二素数，13是第六素数。因为1、2和6各自除以78，所以78在序列中。（请注意，1*2*6不除以78。）
术语序列及其基本指数开始于：
1: {}
2:｛1｝
4: {1,1}
6: {1,2}
8: {1,1,1}
12: {1,1,2}
16: {1,1,1,1}
18: {1,2,2}
24: {1,1,1,2}
28: {1,1,4}
30: {1,2,3}
32: {1,1,1,1,1}
36: {1,1,2,2}
48: {1,1,1,1,2}
54: {1,2,2,2}
56: {1,1,1,4}
60: {1,1,2,3}
64: {1,1,1,1,1,1}
（结束）
|
|
|
MAPLE公司
|
A000040inv:=程序（n）局部i；i： =1；当为true时，如果ithprime（i）=n，则执行RETURN（i）；fi；i:=i+1；结束；结束：isA120383：=proc（n）局部pl，p，i，j；pl:=系数（n）；pl:=pl[2]；对于i从1到nops（pl），做p:=pl[i]；j:=A000040inv（p[1]）；如果n mod j<>0，则返回（false）；fi；od；返回（true）；结束：对于从2到800的n，如果是A120383（n），则执行打印f（“%d，”，n）；fi；od#R.J.马塔尔2006年9月2日
|
|
|
数学
|
{1} ~Join~Select[Range[2，450]，Function[n，AllTrue[PrimePi/@FactorInteger[n][[All，1]]，Mod[n，#]==0&]]](*迈克尔·德弗利格2019年3月24日*）
|
|
|
黄体脂酮素
|
（PARI）ok（n）=我的（f=系数（n））；对于（i=1，#f~，如果（n%primepi（f[i，1]），返回（0））；返回（1）\\雷米·西格里斯特，2017年4月8日
|
|
|
交叉参考
|
囊性纤维变性。A000720号,A003963号,A056239号,A112798号,A323440型,A324846飞机,A324847飞机,A324848飞机,A324850型,A324852型,A324856型.
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
