A037396 Numbers k such that every base-5 digit of k is a base-9 digit of k.

1, 2, 3, 4, 11, 22, 93, 121, 124, 126, 156, 181, 199, 317, 362, 598, 750, 751, 752, 755, 756, 758, 768, 770, 771, 775, 776, 780, 781, 785, 796, 812, 831, 841, 843, 849, 859, 895, 900, 906, 907, 911, 912, 918, 922, 927, 931, 932

Offset

1,2

Links

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

Prog

(Haskell)
import Data.List ((\\), nub)
a037396 n = a037396_list !! (n-1)
a037396_list = filter f [1..] where
   f x = null $ nub (ds 5 x) \\ nub (ds 9 x)
   ds b x = if x > 0 then d : ds b x' else []  where (x', d) = divMod x b
-- Reinhard Zumkeller, May 30 2013
(PARI) is(n)=#setminus(Set(digits(n, 5)), Set(digits(n, 9)))==0 \\ Charles R Greathouse IV, Feb 11 2017

Crossrefs

Cf. A007091, A007095.

Cf. A037393, A037394, A037395, A037397.

Sequence in context: A367807 A118596 A139763 * A037432 A357360 A301877

Adjacent sequences: A037393 A037394 A037395 * A037397 A037398 A037399

Keyword

nonn,base

Author

Clark Kimberling

Status

approved