OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..25
FORMULA
a(n) = 2^A057732(n) + 3. - Elmo R. Oliveira, Nov 08 2023
MAPLE
for n from 1 to 2000 do `if`(isprime(2^n + 3), 2^n + 3, NULL) od;
# alternative:
select(isprime, [seq(2^n+3, n=1..2000)]); # Robert Israel, Dec 28 2015
MATHEMATICA
Select[Table[2^n + 3, {n, 230}], PrimeQ] (* Jayanta Basu, May 23 2013 *)
PROG
(Magma) [ a: n in [0..250] | IsPrime(a) where a is 2^n+3 ] // Vincenzo Librandi, Aug 07 2010
(PARI) for(n=1, 99, if(ispseudoprime(t=2^n+3), print1(t", "))) \\ Charles R Greathouse IV, Jul 02 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
G. L. Honaker, Jr., Oct 29 2000
EXTENSIONS
More terms from Francois Jooste (pin(AT)myway.com), Mar 17 2003
STATUS
approved