Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A241144
Numbers n such that n and 8n share at least one digit.
5
10, 13, 14, 15, 16, 17, 18, 19, 20, 21, 24, 25, 26, 27, 28, 29, 30, 32, 38, 39, 40, 43, 46, 47, 48, 49, 50, 54, 57, 60, 62, 65, 67, 70, 72, 76, 80, 81, 85, 86, 90, 96, 97, 98, 99, 100, 101, 102, 105, 108, 110, 114, 119, 120, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141
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]
KEYWORD
base,easy,nonn
AUTHOR
Robert G. Wilson v, Apr 16 2014
STATUS
approved