A298849 Numbers n where d*n contains the digit d for all of d = 1,2,3,4,5,6,7,8,9.

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

Robert Israel, Table of n, a(n) for n = 1..10000

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

Adjacent sequences: A298846 A298847 A298848 * A298850 A298851 A298852

Keyword

nonn,base

Author

J. Lowell, Jan 27 2018

Extensions

More terms from Michel Marcus, Jan 27 2018

Status

approved