login
A061807
Smallest positive multiple of n containing only even digits.
7
2, 2, 6, 4, 20, 6, 28, 8, 288, 20, 22, 24, 26, 28, 60, 48, 68, 288, 228, 20, 42, 22, 46, 24, 200, 26, 486, 28, 406, 60, 62, 64, 66, 68, 280, 288, 222, 228, 468, 40, 82, 42, 86, 44, 2880, 46, 282, 48, 686, 200, 204, 208, 424, 486, 220, 224, 228, 406, 826, 60, 244, 62
OFFSET
1,1
EXAMPLE
a(7) = 28 because among the multiples of 7, that is, 7, 14, 21, 28,... 28 is the smallest multiple with only even digits.
MATHEMATICA
Table[k = n; While[Length[Intersection[{1, 3, 5, 7, 9}, IntegerDigits[k]]] > 0, k = k + n]; k, {n, 100}] (* T. D. Noe, Jun 03 2013 *)
spme[n_]:=Module[{k=1}, While[AnyTrue[IntegerDigits[k*n], OddQ], k++]; k*n]; Array[spme, 70] (* Harvey P. Dale, Mar 19 2024 *)
CROSSREFS
Sequence in context: A329249 A067045 A083467 * A062885 A062293 A317368
KEYWORD
base,nonn,easy
AUTHOR
Amarnath Murthy, May 28 2001
EXTENSIONS
Corrected and extended by Larry Reeves (larryr(AT)acm.org), May 29 2001
STATUS
approved