OFFSET
1,1
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[8 n]] != {}; Select[ Range[ 140], fQ]
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Robert G. Wilson v, Apr 16 2014
STATUS
approved