|
|
A231815型 |
| 无平方数字(A005117号)形式为p*q*r,素数为p,q,r,q=2*p-1,r=2*q-1。 |
|
三
|
|
|
30, 51319, 3882139, 289022911, 674910259, 991523479, 1893583519, 4550912389, 9761467669, 16721570539, 28685399311, 72886214809, 77372307511, 82720376839, 98685849571, 173850108931, 220038912319, 229352039821, 240313142749, 257401051861, 428178002569
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
形式为p*q*r的无平方数,其中p<q<r=素数,q=2*p-1,r=2*q-1;也就是说,r=4*p-3。
这些数字可以被其适当除数的算术平均数整除。
|
|
链接
|
|
|
例子
|
3882139 = 79*157*313; 157 = 2*79 - 1; 313 = 2*157 - 1.
|
|
数学
|
t={};p=1;执行[While[p=NextPrime[p]!(素数Q[p2=2 p-1]和素数Q[p3=2 p2-1])];附加到[t,p*p2*p3],{30}];吨(*T.D.诺伊2013年11月15日*)
3#-10#^2+8#^3&/@Select[Prime[Range[600]],AllTrue[{2#-1,4#-3},PrimeQ]&](*程序使用Mathematica版本10*中的AllTrue函数)(*哈维·P·戴尔2016年4月2日*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
已批准
|
|
|
|