A109993 Numbers n such that 65537 * 2^n - 1 is prime.
2, 14, 16, 18, 26, 30, 36, 42, 62, 132, 242, 294, 302, 666, 816, 824, 998, 1218, 1472, 2522, 3098, 4148, 6404, 8102, 25656, 26490, 56702, 76442
Offset: 1
Crossrefs
Cf. A112245.
Programs
-
Mathematica
Select[Range[1, 1000], PrimeQ[65537*2^# - 1] &] (* Julien Kluge, Jul 08 2016 *)
-
PARI
is(n)=ispseudoprime(65537*2^n-1) \\ Charles R Greathouse IV, Jun 13 2017
Comments