OFFSET
1,1
COMMENTS
The next term (a(8)) has 344 digits. - Harvey P. Dale, Nov 11 2014
LINKS
MATHEMATICA
Select[Table[FromDigits[PadRight[{7}, n, 3]], {n, 500}], PrimeQ] (* Harvey P. Dale, Nov 11 2014 *)
PROG
(Magma) [a: n in [0..200] | IsPrime(a) where a is (22*10^n-1) div 3 ]; // Vincenzo Librandi, May 08 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Rick L. Shepherd, Apr 08 2004
STATUS
approved