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 A174415 #4 Jul 10 2014 17:01:18 %S A174415 3,5,6,7,9,11,12,13,14,15,17,18,19,22,23,24,25,26,27,28,29,30,31,33, %T A174415 34,35,36,37,38,39,41,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58, %U A174415 59,60 %N A174415 Numbers such that when expressed in base 2 and then interpreted in base 10, is not a multiple of the original number. %C A174415 Complement of A032533. %e A174415 For n=5; a(5) = 9, 9 in base 2 is 1001, which interpreted in base 10, 1001 is not multiple of 9. %t A174415 Select[Range[100],!Divisible[FromDigits[IntegerDigits[#,2]],#]&] (* _Harvey P. Dale_, Jul 10 2014 *) %K A174415 nonn,base %O A174415 1,1 %A A174415 _Jaroslav Krizek_, Mar 19 2010