OFFSET
0,3
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
Eric Weisstein's World of Mathematics, Duodecimal
Wikipedia, Duodecimal
MATHEMATICA
Max[#]&/@IntegerDigits[Range[0, 100], 12] (* Harvey P. Dale, Apr 01 2020 *)
PROG
(Haskell)
import Numeric (showIntAtBase)
import Data.Char (intToDigit, digitToInt)
a190600 = digitToInt . maximum . flip (showIntAtBase 12 intToDigit) ""
-- Reinhard Zumkeller, May 14 2011
(PARI) a(n) = if (n, vecmax(digits(n, 12)), 0); \\ Michel Marcus, Jul 19 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, May 13 2011
STATUS
approved