|
|
A099664
|
|
a[n] is the largest prime before A002278[n] repdigits.
|
|
1
|
|
|
3, 43, 443, 4441, 44417, 444443, 4444409, 44444399, 444444443, 4444444429, 44444444441, 444444444443, 4444444444439, 44444444444353, 444444444444421, 4444444444444423, 44444444444444411, 444444444444444419
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
n=2: 43 is before 44.
|
|
MATHEMATICA
|
<<NumberTheory`NumberTheoryFunctions` Table[Table[PreviousPrime[4*(10^n-1)/9], {n, 1, 35}]
Table[NextPrime[FromDigits[PadRight[{}, n, 4]], -1], {n, 20}] (* Harvey P. Dale, Feb 25 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|