This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A270043 #10 Mar 10 2016 20:55:34 %S A270043 16,17,18,19,20,21,22,24,24,26,26,28,28,30,30,32,32,36,36,36,36,38,38, %T A270043 42,42,42,42,44,44,48,48,48,48,50,50,54,54,54,54,386,386,396,400,426, %U A270043 426,426,515,515,515,515,515,515,515,515,515,515,515,528 %N A270043 a(n) = Smallest m >= 15 containing no sevens when represented in any base from 8 through n. %C A270043 It remains to be determined if the sequence is finite. %H A270043 Nathan Fox, <a href="/A270043/b270043.txt">Table of n, a(n) for n = 8..227</a> %t A270043 Table[SelectFirst[Range[15, 10^3], Total@ Map[Function[k, DigitCount[#, k, 7]], Range[8, n]] == 0 &], {n, 8, 65}] /. n_ /; MissingQ@ n -> Nothing (* _Michael De Vlieger_, Mar 10 2016, Version 10.2 *) %Y A270043 Cf. A270033, A270037, A270038, A216192, A270039, A270040, A270041, A270042, A270044, A270045. %K A270043 nonn,base %O A270043 8,1 %A A270043 _Nathan Fox_, Mar 09 2016