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 A175928 #2 Mar 31 2012 20:25:48 %S A175928 1,1,3,3,4,3,4,5,5,5,5,5,4,4,5,5,5,5,5,5,5,5,5,6,6,5,5,5,5,5,6,6,6,6, %T A175928 7,7,7,6,6,6,6,6,6,6,6,6,5,6,6,6,5,5,5,4,4,4,4,4,4,4,4,4,7,7,7,6,6,6, %U A175928 6,6,6,6,6,6,6,6,6,6,6,8,8,8,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,8,8,8,7,7,7,7 %N A175928 Number of bases in which the concatenation of the consecutive increasing integers 1...n is greater than the concatenation of consecutive decreasing integers n...1 in the same base. %t A175928 Table[Count[ Table[Negative[FromDigits[Flatten[IntegerDigits[Reverse[Range[x]], ba]], \ ba] - FromDigits[Flatten[IntegerDigits[Range[x], ba]], ba]], {ba, 2, x + 1}], True], {x, 1, 200}] %K A175928 base,nonn %O A175928 2,3 %A A175928 _Dylan Hamilton_, Oct 20 2010