|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|