OFFSET
1,1
COMMENTS
No more terms with n < 3000. [Vincenzo Librandi Jan 02 2014]
MATHEMATICA
Select[Table[3^n + 10^n, {n, 0, 1500}], PrimeQ] (* Vincenzo Librandi Jan 02 2014 *)
PROG
(Magma) [a: n in [0..1500] | IsPrime(a) where a is 3^n+10^n];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Apr 29 2010
STATUS
approved