OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..12
MATHEMATICA
Select[Table[6^n+13, {n, 0, 300}], PrimeQ] (* Vincenzo Librandi, Jul 19 2012 *)
PROG
(Magma) [ a: n in [0..250] | IsPrime(a) where a is 6^n+13]; // Vincenzo Librandi, Jul 19 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Mar 05 2005
EXTENSIONS
Corrected a(7) by - Vincenzo Librandi, Jul 19 2012
STATUS
approved