OFFSET
1,3
COMMENTS
a(20) > 40000. - Michael S. Branicky, Jul 24 2024
MATHEMATICA
lst = {}; Do[ If[ PrimeQ[23*10^(n + 2) + 57], AppendTo[ lst, n]], {n, 0, 6000}]; lst (* Robert G. Wilson v, May 29 2009 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Lekraj Beedassy, May 13 2009
EXTENSIONS
a(8)-a(18) from Robert G. Wilson v, May 29 2009
Name edited by Jinyuan Wang, Aug 10 2021
a(19) from Michael S. Branicky, Mar 10 2023
STATUS
approved