OFFSET
1,3
LINKS
Eric Weisstein's World of Mathematics, Thue-Morse Sequence
FORMULA
T(n,m)=ThueMorse(n, 1), a(n) = Sum_{m=1..2^(n - 1)} T(n,m)*2^(m - 1).
MATHEMATICA
FromDigits[ #, 2] & /@ NestList[Flatten[ # /. {1 -> {0, 1}, 0 -> {1, 0}}] &, {1}, 8] (* Robert G. Wilson v, Sep 25 2006 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Roger L. Bagula, Sep 17 2006
EXTENSIONS
Edited by Robert G. Wilson v, Sep 25 2006
STATUS
approved