OFFSET
1,3
MATHEMATICA
Do[ If[ PrimeQ[ 2*3^n + 5 ], Print[ n ] ], {n, 0, 2500} ]
PROG
(PARI) is(n)=ispseudoprime(2*3^n+5) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Nov 16 2000
EXTENSIONS
First term 0 inserted by Georg Fischer, Aug 01 2019
a(24)-a(28) from Jinyuan Wang, Jan 20 2020
a(29) from Michael S. Branicky, Apr 24 2023
STATUS
approved