[go: up one dir, main page]

login
A298849
Numbers n where d*n contains the digit d for all of d = 1,2,3,4,5,6,7,8,9.
1
1, 10, 11, 21, 31, 41, 51, 61, 71, 81, 91, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 121, 131, 141, 151, 161, 171, 181, 191, 201, 210, 211, 221, 231, 241, 251, 261, 271, 281, 291, 301, 310, 311, 321, 331, 341, 351, 361, 371, 381, 391, 401, 410, 411, 421
OFFSET
1,2
COMMENTS
Includes all numbers whose rightmost nonzero digit is a 1.
LINKS
EXAMPLE
12 times 5 = 60, which doesn't contain the digit 5; so 12 is not in this sequence.
MAPLE
filter:= n -> andmap(d -> has(convert(d*n, base, 10), d), [$1..9]):
select(filter, [$1..1000]); # Robert Israel, Feb 27 2018
MATHEMATICA
Select[Range[421], Function[n, NoneTrue[Range@ 9, FreeQ[IntegerDigits[n #], #] &]]] (* Michael De Vlieger, Jan 28 2018 *)
PROG
(PARI) isok(n) = {for (d=1, 9, if (! vecsearch(Set(digits(d*n)), d), return (0)); ); return(1); } \\ Michel Marcus, Jan 27 2018
CROSSREFS
Cf. A296606.
Sequence in context: A089591 A064039 A255536 * A277588 A339138 A022100
KEYWORD
nonn,base
AUTHOR
J. Lowell, Jan 27 2018
EXTENSIONS
More terms from Michel Marcus, Jan 27 2018
STATUS
approved