login
A188574
Numbers n such that n^2 + 2*n + 2^n is prime.
0
1, 3, 5, 7, 13, 15, 35, 43, 159, 245, 265, 1573, 1827, 3359, 3949, 4615, 5463, 5919, 19723
OFFSET
1,2
MATHEMATICA
Select[Range[1, 10000, 2], PrimeQ[#^2 + 2 # + 2^#] &]
PROG
(PARI) is(n)=ispseudoprime(n^2+2*n+2^n) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Cf. A220425 (see the comment by Jonathan Vos Post).
Sequence in context: A157834 A192110 A246026 * A247458 A355424 A339501
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Jan 07 2013
EXTENSIONS
a(19) from Bruno Berselli, Jan 09 2013
STATUS
approved