A281624 Numbers m such that 2^phi(m) + 1 is prime (Fermat prime).
1, 2, 3, 4, 5, 6, 8, 10, 12, 15, 16, 17, 20, 24, 30, 32, 34, 40, 48, 60
Offset: 1
Examples
10 is a term because 2^phi(10) + 1 = 2^4 + 1 = 17 (prime).
Programs
-
Magma
[n: n in[1..10000] | IsPrime(2^(EulerPhi(n)) + 1)];
-
Mathematica
Select[Range[60], PrimeQ[2^EulerPhi[#] + 1] &] (* Paolo Xausa, Jan 18 2025 *)
-
PARI
is(n)=isprime(2^eulerphi(n)+1) \\ Charles R Greathouse IV, Jan 27 2017
Comments