login
A102488
Numbers in base-12 representation that cannot be written with decimal digits.
5
10, 11, 22, 23, 34, 35, 46, 47, 58, 59, 70, 71, 82, 83, 94, 95, 106, 107, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 154, 155, 166, 167, 178, 179, 190, 191, 202, 203, 214
OFFSET
1,1
LINKS
Eric Weisstein's World of Mathematics, Duodecimal
Wikipedia, Duodecimal
EXAMPLE
143 = 11*12^1 + 11*12^0 = 'BB', therefore 143 is a term.
MATHEMATICA
Select[Range[250], Max[IntegerDigits[#, 12]]>9&] (* Harvey P. Dale, Oct 20 2020 *)
PROG
(Haskell)
import Data.List (unfoldr)
a102488 n = a102488_list !! (n-1)
a102488_list = filter (any (> 9) . unfoldr (\x ->
if x == 0 then Nothing else Just $ swap $ divMod x 12)) [1..]
-- Reinhard Zumkeller, Apr 18 2011
CROSSREFS
Complement of A102487; A102490, A102492, A102494.
Sequence in context: A041847 A113702 A373616 * A022315 A061590 A173900
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Jan 12 2005
STATUS
approved