OFFSET
1,1
COMMENTS
a(19) > 2*10^5. - Robert Price, Jul 29 2015
MAPLE
A177093:=n->`if`(isprime(9^n-8), n, NULL): seq(A177093(n), n=1..10^3); # Wesley Ivan Hurt, Nov 14 2014
MATHEMATICA
Select[Range[1000], PrimeQ[9^#-8] &] (* Vincenzo Librandi, Nov 15 2014 *)
PROG
(Magma) [n: n in [1..900]| IsPrime(9^n-8)]
(PARI) is(n)=isprime(9^n-8) \\ Charles R Greathouse IV, Nov 15 2014
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Vincenzo Librandi, Nov 15 2010
EXTENSIONS
Extended and crossref added by D. S. McNeil, Nov 15 2010
a(14)-a(18) from Robert Price, Jul 29 2015
STATUS
approved