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 A270032 #23 Jun 29 2019 01:39:42 %S A270032 0,0,0,0,0,7,0,0,0,0,0,0,7,8,9,10,11,12,13,7,15,8,17,9,19,10,7,11,23, %T A270032 8,25,13,9,7,29,10,31,8,11,17,7,7,7,7,7,7,7,7,8,8,8,8,8,8,7,9,9,9,9,9, %U A270032 9,7,10,10,10,10,10,10,7,8,11,11,11,11,11,7,12,8,12,12,12 %N A270032 a(n) is the smallest b for which the base-b representation of n contains at least one 6 (or 0 if no such base exists). %C A270032 a(n) > 0 for n >= 13 since 16 is n written in base n-6. %C A270032 The only perfect k-th powers (k >= 2) that can appear in this sequence are m^k with 2 <= m <= 6 and k a prime number. %H A270032 Nathan Fox, <a href="/A270032/b270032.txt">Table of n, a(n) for n = 1..10000</a> %t A270032 Table[SelectFirst[Range[7, 1200], DigitCount[n, #, 6] > 0 &], {n, 13, 120}] (* _Michael De Vlieger_, Mar 10 2016, Version 10 *) %o A270032 (PARI) a(n) = if ((n<13) && (n!=6), 0, my(b=7); while(!vecsearch(Set(digits(n, b)), 6), b++); b); \\ _Michel Marcus_, Mar 10 2016 %Y A270032 Cf. A270027, A270028, A216194, A270029, A270030, A270031, A270033, A270034, A270035, A270042. %K A270032 nonn,base %O A270032 1,6 %A A270032 _Nathan Fox_, Mar 08 2016