OFFSET
1,2
MATHEMATICA
Do[ If[ PrimeQ[ 2*5^n - 3 ], Print[ n ] ], {n, 1, 2000} ]
PROG
(PARI) is(n)=ispseudoprime(2*5^n-3) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Nov 16 2000
EXTENSIONS
a(18)-a(20) from Jinyuan Wang, Dec 14 2019
a(21)-a(22) from Michael S. Branicky, Mar 18 2024
a(23)-a(24) from Michael S. Branicky, Oct 25 2024
STATUS
approved