|
| |
|
| A357976飞机 |
| 除数与其商的质数之和相同的数。 |
|
38
|
|
|
|
1, 4, 9, 12, 16, 25, 30, 36, 40, 48, 49, 63, 64, 70, 81, 84, 90, 100, 108, 112, 120, 121, 144, 154, 160, 165, 169, 192, 196, 198, 210, 220, 225, 252, 256, 264, 270, 273, 280, 286, 289, 300, 324, 325, 336, 351, 352, 360, 361, 364, 390, 400, 432, 441, 442, 448
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1, 2
|
|
|
评论
|
n的素数指数是一个数m，使得素数（m）除以n。n的多素数指数集是A112798号.
|
|
|
链接
|
|
|
|
例子
|
这些术语及其主要指数开始于：
1: {}
4: {1,1}
9: {2,2}
12: {1,1,2}
16: {1,1,1,1}
25: {3,3}
30: {1,2,3}
36: {1,1,2,2}
40: {1,1,1,3}
48: {1,1,1,1,2}
49: {4,4}
例如，40具有因子分解8*5，并且两个因子具有相同的素数索引3的和，因此40在序列中。
|
|
|
MAPLE公司
|
过滤器：=proc（n）局部F，s，t，i，R；
F： =系数（n）[2]；
F： =地图（t->[数字理论：-pi（t[1]），t[2]，F）；
s： =加（t[1]*t[2]，t=F）/2；
如果不是s：：integer，则返回假fi；
尝试
R： =优化：-最大化（0，[add（F[i][1]*x[i]，i=1..nops（F））=s，seq（x[i]<=F[i][2]，i=1.nops（F）]，假设=nonnegint，深度极限=20）；
捕获“找不到可行的整数点；使用可行性容差选项调整容差”：返回false；
结束尝试；
真的
结束进程：
过滤器（1）：=真：
|
|
|
数学
|
sumprix[n_]：=总[Cases[FactorInteger[n]，{p_，k_}:>k*PrimePi[p]]]；
选择[Range[100]、MemberQ[sumprix/@Divisors[#]、sumprix[#]/2]&]
|
|
|
交叉参考
|
囊性纤维变性。A033879号,A033880型,A064914号,A181819号,A213086型,A235130型,A237194号,A276107型,A300273型,A321144型,A357975型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
