A154832 Primes p such that p^4-2 is also prime.
3, 7, 11, 13, 29, 41, 43, 53, 59, 73, 83, 101, 181, 239, 241, 277, 293, 311, 367, 389, 409, 421, 433, 503, 587, 617, 647, 683, 757, 773, 811, 823, 839, 881, 907, 953, 1019, 1093, 1117, 1187, 1249, 1361, 1471, 1481, 1543, 1553, 1571, 1637, 1667, 1747, 1789, 1847
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
lst={};Do[p=n^4-2;If[PrimeQ[p],If[PrimeQ[n],AppendTo[lst,n]]],{n,0,7!}];lst Select[Prime[Range[300]],PrimeQ[#^4-2]&] (* Harvey P. Dale, Nov 24 2018 *)
Comments