OFFSET
2,1
COMMENTS
Theoretically, there might exist an n for which there is no solution, in which case a(n) would be set to 0 by convention; however, no such case was found so far. Problem: does it exist?
LINKS
Stanislav Sykora, Table of n, a(n) for n = 2..10000
EXAMPLE
Example: a(13) = 172 because 172 is the first number >1 such that its expansions in base 2 (10101100) and in base 13 (103) have the same sum of digits, namely 4.
MATHEMATICA
sdn[n_]:=Module[{a=2}, While[Total[IntegerDigits[a, 2]]!=Total[ IntegerDigits[ a, n]], a++]; a]; Array[sdn, 70, 2] (* Harvey P. Dale, May 29 2013 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Stanislav Sykora, May 08 2012
STATUS
approved