A309855 Primes p such that 2*p^5-1 is also prime.
7, 151, 379, 547, 631, 727, 769, 1531, 1627, 1741, 1789, 1999, 2131, 2437, 2659, 2797, 2857, 2917, 3217, 3331, 3511, 3919, 3931, 4591, 4651, 4759, 4801, 4831, 4957, 5281, 5689, 5701, 5779, 5821, 5881, 6067, 6217, 6361, 6619, 6871, 7039, 7309, 7489, 7927, 8179, 8221, 8329, 8581, 8641
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Range[10000], PrimeQ[#]&&PrimeQ[2*(#^5)-1] &] (* Metin Sariyar, Aug 21 2019 *) Select[Prime[Range[1100]],PrimeQ[2#^5-1]&] (* Harvey P. Dale, Jul 19 2025 *)