OFFSET
1,3
COMMENTS
No further terms <= 55000. - Serge Batalov, Oct 31 2010
a(30) > 2*10^5. - Robert Price, May 20 2015
MATHEMATICA
Do[ If[ PrimeQ[ 5*3^n - 2 ], Print[ n ] ], {n, 0, 4200} ]
PROG
(Magma) [n: n in [0..1000] | IsPrime(5*3^n-2)]; // Vincenzo Librandi, May 21 2015
(PARI) is(n)=ispseudoprime(5*3^n-2) \\ Charles R Greathouse IV, Jun 13 2017
(PFGW) ABC2 5*3^$a - 2
a: from 0 to 10000 // Jinyuan Wang, Feb 01 2020
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Dec 26 2000
EXTENSIONS
Corrected by and more PRP terms from Serge Batalov, Oct 31 2010
a(29) from Robert Price, May 20 2015
Added 0 from Vincenzo Librandi, May 21 2015
STATUS
approved