The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A037405 Numbers n such that every base 8 digit of n is a base 9 digit of n. 3
 1, 2, 3, 4, 5, 6, 7, 9, 18, 27, 36, 45, 54, 63, 73, 124, 137, 146, 177, 210, 219, 283, 284, 292, 356, 365, 429, 438, 502, 511, 568, 576, 586, 763, 768, 769, 772, 897, 906, 942, 945, 946, 950, 970, 1100, 1152, 1163, 1172, 1199, 1474 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Reinhard Zumkeller, Table of n, a(n) for n = 1..10000 MATHEMATICA bQ[n_]:=Module[{idn8=Union[IntegerDigits[n, 8]], idn9=Union[ IntegerDigits[ n, 9]]}, And@@ (MemberQ[ idn9, #]&/@idn8)]; Select[Range[1500], bQ] (* Harvey P. Dale, Jul 17 2011 *) PROG (Haskell) import Data.List ((\\), nub) a037405 n = a037405_list !! (n-1) a037405_list = filter f [1..] where    f x = null \$ nub (ds 8 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 CROSSREFS Cf. A037406. Sequence in context: A029803 A297265 A048319 * A048333 A007496 A082274 Adjacent sequences:  A037402 A037403 A037404 * A037406 A037407 A037408 KEYWORD nonn,base AUTHOR STATUS approved

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

Last modified October 20 21:32 EDT 2020. Contains 337910 sequences. (Running on oeis4.)