OFFSET
1,3
COMMENTS
a(37) > 2*10^5. - Robert Price, Oct 23 2013
a(38) > 3*10^5. - Tyler NeSmith, Jan 16 2021
MATHEMATICA
Select[Range[0, 5000], PrimeQ[3^# + 10] &]
PROG
(PARI) for(n=0, 5*10^3, if(isprime(3^n+10), print1(n", ")))
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Vincenzo Librandi, Oct 01 2012
EXTENSIONS
a(21)-a(36) from Robert Price, Oct 23 2013
a(37) from Tyler NeSmith, Jan 16 2021
STATUS
approved