login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A138603
Numbers n such that 2^(2*n-43)-43 is prime.
0
22, 24, 36, 60, 1678
OFFSET
1,1
EXAMPLE
2^(2*36-43)-43=536870869, 2^(2*60-43)-43=151115727451828646838229, ...
MATHEMATICA
q=43; For[i=q, i<=q, a={}; Do[x=2^(2*n-i)-i; If[PrimeQ[x], AppendTo[a, n]], {n, 13^3}]; Print["2^(2*n-", i, ")-", i, " ", a]; i=i+2]
Select[Range[1680], PrimeQ[2^(2#-43)-43]&] (* Harvey P. Dale, Apr 25 2020 *)
PROG
(PARI) is(n)=isprime(2^(2*n-43)-43) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A030593 A235807 A244397 * A181454 A155911 A061411
KEYWORD
nonn,easy
AUTHOR
STATUS
approved