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 A190597 #9 Jul 19 2020 05:14:33 %S A190597 0,1,2,3,4,5,6,7,1,1,2,3,4,5,6,7,2,2,2,3,4,5,6,7,3,3,3,3,4,5,6,7,4,4, %T A190597 4,4,4,5,6,7,5,5,5,5,5,5,6,7,6,6,6,6,6,6,6,7,7,7,7,7,7,7,7,7,1,1,2,3, %U A190597 4,5,6,7,1,1,2,3,4,5,6,7,2,2,2,3,4,5,6,7,3,3,3,3,4,5,6,7,4,4,4,4,4,5,6,7,5 %N A190597 Maximal digit in base-8 expansion of n. %t A190597 Max[IntegerDigits[#,8]]&/@Range[0,110] (* _Harvey P. Dale_, Sep 05 2019 *) %o A190597 (PARI) a(n) = if (n, vecmax(digits(n, 8)), 0); \\ _Michel Marcus_, Jul 19 2020 %Y A190597 Cf. A007094, A054055. %K A190597 nonn,base %O A190597 0,3 %A A190597 _N. J. A. Sloane_, May 13 2011