OFFSET
1,2
COMMENTS
207 is the smallest number containing a zero, cf. A192825. [Reinhard Zumkeller, Aug 09 2011]
LINKS
T. D. Noe, Table of n, a(n) for n=1..2000
EXAMPLE
36 is in the list since 2*36=72, which shares no digit with 36.
MATHEMATICA
Select[Range[140], Intersection[IntegerDigits[2 #], IntegerDigits[#]] =={}&] (* Harvey P. Dale, Apr 30 2011 *)
PROG
(Haskell)
import Data.List (intersect)
a038365 n = a038365_list !! (n-1)
a038365_list = filter (\x -> null (show (2*x) `intersect` show x)) [1..]
-- Reinhard Zumkeller, Aug 09 2011
CROSSREFS
KEYWORD
nonn,easy,base,nice
AUTHOR
STATUS
approved