A089345 Primes of the form identical even digits followed by a 1.

41, 61, 661, 881, 2221, 4441, 6661, 6666666661, 44444444441, 222222222222222221, 666666666666666661, 8888888888888888881, 666666666666666666661, 6666666666666666666661, 4444444444444444444444444441

Offset: 1

Author

Amarnath Murthy, Nov 05 2003

Keywords

• base
• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..37

Crossrefs

Cf. A089346, A089347.

Programs

Mathematica

Select[FromDigits/@Flatten[Table[Join[PadLeft[{n},i,n],{1}],{i,100},{n,2,9,2}],1],PrimeQ] (* Vincenzo Librandi, Dec 12 2011 *)

Extensions

More terms from Ray Chandler, Nov 07 2003