A037397 Every base 5 digit of n is a base 10 digit of n.

1, 2, 3, 4, 12, 24, 31, 62, 93, 104, 124, 130, 150, 156, 162, 174, 182, 213, 250, 260, 281, 302, 312, 324, 342, 390, 473, 493, 504, 604, 624, 781, 812, 831, 912, 1003, 1030, 1031, 1032, 1033, 1034, 1043, 1083, 1093, 1174, 1234, 1243

Offset

1,2

Links

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

Prog

(Haskell)
import Data.List ((\\), nub)
a037397 n = a037397_list !! (n-1)
a037397_list = filter f [1..] where
   f x = null $ nub (ds 5 x) \\ nub (ds 10 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. A037393, A037394, A037395, A037396.

Sequence in context: A239943 A295754 A059810 * A168047 A236371 A333620

Adjacent sequences: A037394 A037395 A037396 * A037398 A037399 A037400

Keyword

nonn,base

Author

Clark Kimberling

Status

approved