A058959 Numbers k such that 3^k - 4 is prime.
2, 3, 5, 21, 31, 37, 41, 53, 73, 101, 175, 203, 225, 455, 557, 651, 1333, 4823, 20367, 32555, 52057, 79371, 267267, 312155
Offset: 1
Links
- Farideh Firoozbakht and M. F. Hasler, Variations on Euclid's formula for Perfect Numbers, JIS 13 (2010) #10.3.1.
- Henri & Renaud Lifchitz, PRP Records.
Crossrefs
Programs
-
Magma
[n: n in [1..10^3]| IsPrime(3^n-4)]; // Vincenzo Librandi, Mar 24 2015
-
Mathematica
Do[ If[ PrimeQ[3^n - 4], Print[n] ], {n, 1, 3000} ]
-
PARI
for(n=1,10^3,if(ispseudoprime(3^n-4),print1(n,", "))) \\ Derek Orr, Mar 06 2015
Extensions
a(18)=4823, corresponding to a certified prime, from Ryan Propper, Jun 30 2005
a(19)=20367 from Ray Chandler, Jul 25 2011
a(20)=32555, a(21)=52057 from Henri Lifchitz, Jan 2005
a(22)=79371 from Ray Chandler, Jul 25 2011
a(23)=267267 from Roman Ilyukhin, Oct 17 2014
a(24)=312155 from Roman Ilyukhin, Feb 28 2015
Comments