login
A270038
a(n) = Smallest m >= 3 containing no ones when represented in any base from 3 through n.
9
6, 8, 60, 560, 870899850, 871017138, 871017138, 65473886952, 65473886954
OFFSET
3,1
COMMENTS
It remains to be determined if the sequence is finite.
a(12) > 3.4*10^30, if it exists. - Giovanni Resta, Oct 14 2019
MATHEMATICA
Table[SelectFirst[Range[3, 10^3], Total@ Map[Function[k, DigitCount[#, k, 1]], Range[3, n]] == 0 &], {n, 3, 7}] /. n_ /; MissingQ@ n -> Nothing (* Michael De Vlieger, Mar 10 2016, Version 10.2 *)
KEYWORD
nonn,base,more
AUTHOR
Nathan Fox, Mar 09 2016
STATUS
approved