A382786 Numbers k such that 5^k + k is prime.
7954, 22102, 33054, 135156
Offset: 1
Programs
-
Mathematica
Select[Range[35000], PrimeQ[5^# + #] &] (* Nico Puada, Apr 24 2025 *)
Extensions
a(4) corrected by Jakub Buczak, May 04 2025
Comments