A074161 Smallest multiple of n (>n) using all composite digits (4,6,8,9 and 0).

4, 4, 6, 8, 40, 48, 49, 40, 90, 40, 44, 48, 468, 84, 60, 48, 68, 90, 494, 40, 84, 44, 46, 48, 400, 468, 486, 84, 406, 60, 496, 64, 66, 68, 490, 468, 444, 494, 468, 80, 984, 84, 86, 88, 90, 460, 94, 96, 98, 400, 408, 468, 689, 486, 440, 448, 684, 406, 649, 480, 488, 496

Offset

1,1

Links

Table of n, a(n) for n=1..62.

Mathematica

smn[n_]:=Module[{t=2}, While[Count[IntegerDigits[n*t], _?PrimeQ]!=0 || MemberQ[ IntegerDigits[n*t], 1], t++]; t*n]; Array[smn, 70] (* Harvey P. Dale, Nov 10 2013 *)

Crossrefs

Sequence in context: A100090 A222732 A363703 * A201401 A163925 A200609

Adjacent sequences: A074158 A074159 A074160 * A074162 A074163 A074164

Keyword

base,nonn

Author

Amarnath Murthy, Aug 29 2002

Extensions

Corrected and extended by Joshua Zucker, May 08 2006

Status

approved