|
%I #7 Jul 19 2020 04:24:22
%S 0,1,2,3,4,5,6,1,1,2,3,4,5,6,2,2,2,3,4,5,6,3,3,3,3,4,5,6,4,4,4,4,4,5,
%T 6,5,5,5,5,5,5,6,6,6,6,6,6,6,6,1,1,2,3,4,5,6,1,1,2,3,4,5,6,2,2,2,3,4,
%U 5,6,3,3,3,3,4,5,6,4,4,4,4,4,5,6,5,5,5,5,5,5,6,6,6,6,6,6,6,6,2,2,2,3,4,5,6
%N Maximal digit in base-7 expansion of n.
%o (PARI) a(n) = if (n, vecmax(digits(n, 7)), 0); \\ _Michel Marcus_, Jul 19 2020
%Y Cf. A007093, A054055.
%K nonn,base
%O 0,3
%A _N. J. A. Sloane_, May 13 2011
|
