OFFSET
1,1
MATHEMATICA
Select[(41 10^Range[0, 60]-23)/9, PrimeQ] (* Harvey P. Dale, Dec 12 2020 *)
PROG
(Magma) [a: n in [0..250] | IsPrime(a) where a is (41*10^n-23)div(9)]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Dec 11 2010
STATUS
approved