OFFSET
1,2
COMMENTS
a(47) > 2*10^5. - Robert Price, Jan 14 2016
MATHEMATICA
Do[ If[ PrimeQ[3^n - 2^(n - 1)], Print[n]], {n, 3000}]
PROG
(PARI) is(n)=ispseudoprime(3^n-2^(n-1)) \\ Charles R Greathouse IV, Jun 05 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Herman H. Rosenfeld (herm3(AT)pacbell.net) and Robert G. Wilson v, Jun 17 2004
EXTENSIONS
More terms from Ray G. Opao, Jul 22 2004
a(30)-a(46) from Robert Price, Jan 14 2016
STATUS
approved