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 A186703 #7 Mar 30 2012 17:27:25
%S A186703 2,6,8,13,16,18,20,24,26,31,32,37,41,46,48,52,54,56,60,62,67,70,72,74,
%T A186703 78,80,85,86,91,94,96,98,103,104,109,115,118,119,121,122,125,130,131,
%U A186703 136,138,142,144,146,149,154,156,160
%N A186703 Balanced ternary non-Harshad numbers.
%C A186703 Numbers not divisible by the sum of their balanced ternary digits.
%C A186703 All terms of A174658 are in this sequence because their balanced ternary digits add up to 0.
%C A186703 Terms of this sequence not in A174658 are generally prime numbers.
%e A186703 The balanced ternary representation of 13 is {1, 1, 1}, which adds up to 3. Since 3 does not divide 13 evenly, 13 is in the list.
%e A186703 The balanced ternary representation of 17 is {1, -1, 0, -1}, this adds up to -1, which divides 17 evenly. Therefore, 17 is not in the list.
%t A186703 (* First run the program for A065363 to define balTernDigits *) Complement[Range[200], Select[Range[200], Plus@@balTernDigits[#] != 0 && IntegerQ[#/(Plus@@balTernDigits[#])] &]]
%Y A186703 Cf. A005349, base 10 Harshad numbers.
%K A186703 nonn,base
%O A186703 1,1
%A A186703 _Alonso del Arte_, Feb 25 2011