|
|
A099665
|
|
a[n] is the largest prime before A002279[n] repdigits.
|
|
0
|
|
|
3, 53, 547, 5531, 55547, 555523, 5555527, 55555553, 555555541, 5555555519, 55555555543, 555555555551, 5555555555551, 55555555555541, 555555555555529, 5555555555555539, 55555555555555519, 555555555555555487
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
n=2: 53 is before 55.
|
|
MATHEMATICA
|
<<NumberTheory`NumberTheoryFunctions` Table[Table[PreviousPrime[5*(10^n-1)/9], {n, 1, 35}]
NextPrime[#, -1]&/@Table[FromDigits[PadRight[{}, n, 5]], {n, 20}] (* Harvey P. Dale, Aug 31 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|