This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A241143 #6 Apr 25 2014 11:21:44 %S A241143 5,10,13,15,16,17,18,19,20,21,25,26,29,30,31,32,33,34,35,39,40,42,43, %T A241143 45,49,50,51,53,55,60,64,65,66,67,68,70,71,75,80,83,84,85,86,90,95,96, %U A241143 97,98,99,100,101,102,103,105,107,110,113,115,116,117,118,120,123,125,126,128,129,130,131,132,133,134,135,139,140 %N A241143 Numbers n such that n and 7n share at least one digit. %C A241143 All numbers n which are congruent to 0 (mod 5) have this characteristic. %e A241143 13 is in the sequence since 13 and 7*13 = 91 and together they share the digit 1. %t A241143 fQ[n_] := Intersection[ IntegerDigits[ n], IntegerDigits[7 n]] != {}; Select[ Range[ 100], fQ] %Y A241143 Cf. A129845, A129846, A129848, A241141, A241142, A241144, A241145, A241146. %K A241143 base,easy,nonn %O A241143 1,1 %A A241143 _Robert G. Wilson v_, Apr 16 2014