|
|
A370810型 |
| 通过对n的每个素数指数选择不同的除数,从而只得到一个集合。 |
|
13
|
|
|
1, 2, 6, 9, 10, 22, 25, 30, 34, 42, 45, 62, 63, 66, 75, 82, 98, 99, 102, 110, 118, 121, 134, 147, 153, 166, 170, 186, 210, 218, 230, 246, 254, 275, 279, 289, 310, 314, 315, 330, 343, 354, 358, 363, 369, 374, 382, 390, 402, 410, 422, 425, 462, 482, 490, 495
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.
|
|
链接
|
|
|
例子
|
6591的素数指数是{2,6,6,6},唯一的选择是{1,2,3,6},所以6591在序列中。
这些术语及其主要指数开始于:
1: {}
2: {1}
6: {1,2}
9:{2,2}
10: {1,3}
22: {1,5}
25: {3,3}
30: {1,2,3}
34: {1,7}
42: {1,2,4}
45: {2,2,3}
62: {1,11}
63: {2,2,4}
66:{1,2,5}
75: {2,3,3}
82: {1,13}
98: {1,4,4}
99: {2,2,5}
102: {1,2,7}
110: {1,3,5}
|
|
数学
|
prix[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
Select[Range[100],Length[Union[Sort/@Select[Tuples[Divisors/@prix[#]],UnsameQ@@#&]]==1&]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|