A037393 Numbers k such that every base-5 digit of k is a base-6 digit of k.

1, 2, 3, 4, 6, 12, 18, 24, 31, 46, 56, 62, 75, 81, 87, 90, 91, 92, 93, 94, 99, 118, 124, 145, 150, 157, 226, 232, 243, 245, 291, 300, 306, 307, 308, 311, 312, 314, 322, 326, 332, 336, 337, 338, 341, 362, 372, 374, 378, 411, 416, 418

Offset

1,2

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Prog

(Haskell)
import Data.List ((\\), nub)
a037393 n = a037393_list !! (n-1)
a037393_list = filter f [1..] where
   f x = null $ nub (ds 5 x) \\ nub (ds 6 x)
   ds b x = if x > 0 then d : ds b x' else []  where (x', d) = divMod x b
-- Reinhard Zumkeller, May 30 2013

Crossrefs

Cf. A007091, A007092.

Cf. A037394, A037395, A037396, A037397.

Sequence in context: A029952 A140494 A048316 * A048330 A118651 A206292

Adjacent sequences: A037390 A037391 A037392 * A037394 A037395 A037396

Keyword

nonn,base

Author

Clark Kimberling

Status

approved