login
A089345
Primes of the form identical even digits followed by a 1.
6
41, 61, 661, 881, 2221, 4441, 6661, 6666666661, 44444444441, 222222222222222221, 666666666666666661, 8888888888888888881, 666666666666666666661, 6666666666666666666661, 4444444444444444444444444441
OFFSET
1,1
LINKS
MATHEMATICA
Select[FromDigits/@Flatten[Table[Join[PadLeft[{n}, i, n], {1}], {i, 100}, {n, 2, 9, 2}], 1], PrimeQ] (* Vincenzo Librandi, Dec 12 2011 *)
CROSSREFS
Sequence in context: A260554 A031415 A325072 * A320468 A055110 A245317
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 05 2003
EXTENSIONS
More terms from Ray Chandler, Nov 07 2003
STATUS
approved