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 A190593 #14 May 03 2024 14:24:47 %S A190593 0,1,2,3,1,1,2,3,2,2,2,3,3,3,3,3,1,1,2,3,1,1,2,3,2,2,2,3,3,3,3,3,2,2, %T A190593 2,3,2,2,2,3,2,2,2,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,1,1,2,3, %U A190593 1,1,2,3,2,2,2,3,3,3,3,3,1,1,2,3,1,1,2,3,2,2,2,3,3,3,3,3,2,2,2,3,2,2,2,3,2 %N A190593 Maximal digit in base-4 expansion of n. %H A190593 Paolo Xausa, <a href="/A190593/b190593.txt">Table of n, a(n) for n = 0..10000</a> %t A190593 Map[Max, IntegerDigits[Range[0, 100], 4]] (* _Paolo Xausa_, May 03 2024 *) %o A190593 (PARI) a(n) = if (n, vecmax(digits(n, 4)), 0); \\ _Michel Marcus_, Jul 19 2020 %Y A190593 Cf. A007090, A054055. %K A190593 base,nonn %O A190593 0,3 %A A190593 _N. J. A. Sloane_, May 13 2011