OFFSET
1,1
MATHEMATICA
Select[2*10^Range[100]-7, PrimeQ] (* Harvey P. Dale, Jan 27 2015 *)
PROG
(Magma)[a: n in [1..250]|IsPrime(a) where a is (2*10^n-7)]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Dec 11 2010
EXTENSIONS
One more term (a(10)) from Harvey P. Dale, Jan 27 2015
STATUS
approved