A241145 Numbers n such that n and 9n share at least one digit.

5, 10, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 23, 24, 25, 26, 27, 28, 29, 30, 32, 34, 35, 36, 37, 38, 39, 40, 43, 45, 46, 47, 48, 49, 50, 51, 54, 55, 56, 57, 58, 59, 60, 63, 64, 65, 67, 68, 69, 70, 73, 75, 76, 78, 79, 80, 82, 85, 87, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 105, 109, 110, 112, 113

Offset

1,1

Links

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

Example

13 is in the sequence since 13 and 8*13 = 104 and together they share the digit 1.

Mathematica

fQ[n_] := Intersection[ IntegerDigits[ n], IntegerDigits[9 n]] != {}; Select[ Range[ 115], fQ]

Crossrefs

Cf. A129845, A129846, A129848, A241141, A241142, A241143, A241144, A241146.

Sequence in context: A271920 A329773 A213520 * A050680 A293726 A313359

Adjacent sequences: A241142 A241143 A241144 * A241146 A241147 A241148

Keyword

base,easy,nonn

Author

Robert G. Wilson v, Apr 16 2014

Status

approved