|
| |
|
|
A201965
|
|
Primes of the form identical digits preceded by a 10.
|
|
1
|
|
|
|
101, 103, 107, 109, 1033, 10111, 10333, 101111, 103333, 107777, 10333333, 101111111, 103333333, 1033333333, 10999999999, 101111111111, 1099999999999, 10333333333333, 101111111111111111, 1099999999999999999, 10333333333333333333
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..37
|
|
|
MATHEMATICA
|
Select[FromDigits/@Flatten[Table[PadRight[{10}, i, #]&/@{1, 2, 3, 4, 5, 6, 7, 8, 9}, {i, 2, 200}], 1], PrimeQ[#]&]
|
|
|
CROSSREFS
|
Sequence in context: A119680 A329737 A166571 * A318157 A117837 A176929
Adjacent sequences: A201962 A201963 A201964 * A201966 A201967 A201968
|
|
|
KEYWORD
|
nonn,base,less
|
|
|
AUTHOR
|
Vincenzo Librandi, Dec 10 2011
|
|
|
STATUS
|
approved
|
| |
|
|
