搜索： 编号：a238136
|
| |
|
|
A238136号
|
| 素数p使得p^4-p^3+1和p^4-p ^3-1也是素数。 |
|
+0
4
|
|
|
|
1429, 5827, 7411, 9601, 12601, 18457, 20011, 20521, 24919, 25999, 28591, 29947, 33211, 33349, 36037, 38149, 41227, 42649, 43579, 45307, 46099, 49999, 52057, 52387, 54319, 59107, 59197, 59629, 67891, 70951, 73477, 74761, 75037, 81157, 92041, 93607, 114889
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
例子
|
1429在序列中，因为1429，（1429^4-1429^3+1）和（1429*4-1429*3-1）都是素数。
|
|
|
MAPLE公司
|
KD:=proc（）局部a，b，d；a： =ithprime（n）；b： =a^4-a^3+1；d： =a^4-a^3-1；如果是isprime（b）和isprim（d），则返回（a）；fi；结束：seq（KD（），n=1..20000）；
|
|
|
数学
|
选择[Prime[Range[3000]]，PrimeQ[#^4-#^3+1]&&PrimeQ[#^4-#^3-1]&]
c=0；a=2；Do[k=素数[n]；如果[PrimeQ[k^4-k^3+1]和&PrimeQ[k^4-k ^3-1]，c=c+1；打印[c，“”，k]]，{n，1，2000000}]；
pQ[n_]：=模[{c=n^4-n^3}，AllTrue[c+{1，-1}，PrimeQ]]；选择[Prime[Range[11000]]，pQ]（*程序使用Mathematica版本10的AllTrue函数*）(*哈维·P·戴尔2014年10月19日*）
|
|
|
黄体脂酮素
|
（PARI）s=[]；对于素数（p=2120000，if（isprime（p^4-p^3+1）&isprime，s=concat（s，p））；秒\\科林·巴克2014年2月18日
|
|
|
交叉参考
|
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.004秒内完成
|
