login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A037388 Numbers k such that every base-4 digit of k is a base-6 digit of k. 6
1, 2, 3, 15, 38, 55, 63, 73, 85, 91, 117, 119, 121, 127, 170, 231, 236, 243, 255, 256, 257, 264, 276, 288, 289, 290, 291, 292, 293, 294, 306, 324, 325, 326, 327, 336, 341, 343, 348, 349, 350, 351, 362, 375, 381, 383, 408, 409, 410 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

MATHEMATICA

Select[Range[500], SubsetQ[IntegerDigits[#, 6], IntegerDigits[#, 4]]&] (* Harvey P. Dale, Mar 19 2018 *)

PROG

(Haskell)

import Data.List ((\\), nub)

a037388 n = a037388_list !! (n-1)

a037388_list = filter f [1..] where

   f x = null $ nub (ds 4 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. A007090, A007092.

Cf. A037387, A037389, A037390, A037391, A037392.

Sequence in context: A241198 A296296 A143880 * A298370 A221860 A216339

Adjacent sequences:  A037385 A037386 A037387 * A037389 A037390 A037391

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 22 22:13 EDT 2022. Contains 353959 sequences. (Running on oeis4.)