login
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.
0
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, 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, 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
OFFSET
2,3
MATHEMATICA
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}]
CROSSREFS
Sequence in context: A243341 A238856 A096139 * A161357 A138372 A316662
KEYWORD
base,nonn
AUTHOR
Dylan Hamilton, Oct 20 2010
STATUS
approved