OFFSET
1,2
MATHEMATICA
Select[Range[850], PrimeQ[2^#+2#-1]&] (* Harvey P. Dale, Jul 26 2021 *)
PROG
(Magma) [n: n in [1..1200] | IsPrime(2^n+2*n-1) ]
(PARI) is(n)=ispseudoprime(2^n+2*n-1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Mar 11 2010
STATUS
approved