A270045 Smallest m >= 19 containing no nines when represented in any base from 10 through n.

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

Offset: 10

Author

Nathan Fox, Mar 09 2016

Keywords

• nonn
• base

Comments

It remains to be determined if the sequence is finite.

Links

• Nathan Fox, Table of n, a(n) for n = 10..359

Crossrefs

Cf. A270035, A270037, A270038, A216192, A270039, A270040, A270041, A270042, A270043, A270044.

Programs

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 *)