OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..37
FORMULA
a(n) = 2^A057197(n) + 15. - Elmo R. Oliveira, Nov 08 2023
MATHEMATICA
Select[2^Range[0, 200]+15, PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Feb 03 2012 *)
Select[Table[2^n + 15, {n, 1, 300}], PrimeQ] (* Vincenzo Librandi, Feb 23 2014 *)
PROG
(PARI) {for(n=0, 72, if(isprime(k=2^n+15), print1(k, ", ")))}
(Magma)[a: n in [1..100] | IsPrime(a) where a is 2^n+15]; // Vincenzo Librandi, Feb 23 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Dec 09 2008
EXTENSIONS
Edited by Klaus Brockhaus and R. J. Mathar, Dec 10 2008
Definition simplified by Jon E. Schoenfield, Jun 17 2010
STATUS
approved