1,1

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

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

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

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

base,easy,nonn

Robert G. Wilson v, Apr 16 2014

approved