OFFSET
1,1
COMMENTS
a(13) > 90000. - Michael S. Branicky, May 21 2026
EXAMPLE
2^(2*24-37)-37 = 2011, 2^(2*30-37)-37 = 8388571, 2^(2*66-37)-37 = 39614081257132168796771975131, ... .
MATHEMATICA
q=37; For[i=q, i<=q, a={}; Do[x=2^(2*n-i)-i; If[PrimeQ[x], AppendTo[a, n]], {n, 10^3}]; Print["2^(2*n-", i, ")-", i, " ", a]; i=i+2]
Select[Range[5000], PrimeQ[2^(2 # - 37) - 37] &] (* Harvey P. Dale, Dec 03 2021 *)
PROG
(PARI) is(n)=isprime(2^(2*n-37)-37) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Vladimir Joseph Stephan Orlovsky, May 13 2008
EXTENSIONS
More terms from Harvey P. Dale, Dec 03 2021
Terms 20 and 21 removed and a(11)-a(12) from Michael S. Branicky, May 20 2026
STATUS
approved
