OFFSET
1,1
COMMENTS
a(14)=1023 and a(15)=1486 correspond to BPSW strong probable primes (passing PARI's ispseudoprime()). - Joerg Arndt, Jun 06 2011
a(25) > 2*10^5. - Robert Price, Nov 14 2014
MAPLE
A191469:=n->`if`(isprime(7^n-6), n, NULL): seq(A191469(n), n=1..10^3); # Wesley Ivan Hurt, Nov 14 2014
MATHEMATICA
Select[Range[1, 5000], PrimeQ[7^#-6]&] (* Vincenzo Librandi, Aug 05 2012 *)
PROG
(Magma) [n: n in [1..1000]| IsPrime(7^n-6)]
(PARI) for(n=1, 10^6, if(isprime(7^n-6), print1(n, ", ")))
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Vincenzo Librandi, Jun 06 2011
EXTENSIONS
a(17)-a(23) from Robert Price, Jan 24 2014
a(24) from Robert Price, Nov 14 2014
STATUS
approved