|
|
A270045
|
|
Smallest m >= 19 containing no nines when represented in any base from 10 through n.
|
|
11
|
|
|
20, 21, 22, 23, 24, 25, 26, 27, 28, 30, 30, 32, 32, 34, 34, 36, 36, 38, 38, 40, 40, 44, 44, 44, 44, 46, 46, 50, 50, 50, 50, 52, 52, 56, 56, 56, 56, 58, 58, 62, 62, 62, 62, 68, 68, 68, 68, 68, 68, 70, 70, 76, 76, 76, 76, 76, 76, 80, 80, 80, 80, 82, 82, 88, 88, 88, 88, 88, 88, 840
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
10,1
|
|
COMMENTS
|
It remains to be determined if the sequence is finite.
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[SelectFirst[Range[19, 10^3], Total@ Map[Function[k, DigitCount[#, k, 9]], Range[10, n]] == 0 &], {n, 10, 79}] /. n_ /; MissingQ@ n -> Nothing (* Michael De Vlieger, Mar 10 2016, Version 10.2 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|