A139067 Primes whose decimal expansion consists of a string of 2's followed by a string of 3's.
2, 3, 23, 223, 233, 2333, 23333, 2222333, 22222223, 223333333, 22222222223, 22222223333, 22222333333, 22223333333, 23333333333, 222223333333, 23333333333333333, 2222222222222233333, 2222222222333333333
Offset: 1
Programs
-
Mathematica
With[{nn=20},Sort[Select[Flatten[Table[FromDigits[Join[Table[2,{i}],Table[3,{j}]]],{i,0,nn},{j,0,nn}]],PrimeQ]]] (* Harvey P. Dale, Jan 30 2013 *)
Extensions
Entry revised by Ray Chandler and N. J. A. Sloane, Aug 14 2008