|
Search: id:A122570
|
|
|
| A122570 |
|
Consider the Thue-Morse sequence (A010060) at each iteration. Read each reversed string as a binary number and convert it to a decimal number. |
|
+0
1
|
|
| 0, 2, 6, 150, 27030, 2523490710, 7608434000728254870, 199931532107794273605284333428918544790, 47758914269546354982683078068829456704164423862093743397580034411621752859030
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics
|
|
FORMULA
|
T[n,m]=ThueMorse[n, 0], a(n) = Sum[T[n,m]*2^(m - 1), {m, 1, 2^(n - 1)}]
|
|
MATHEMATICA
|
FromDigits[ #, 2] & /@ NestList[Flatten[ # /. {1 -> {0, 1}, 0 -> {1, 0}}] &, {0}, 8] (* Robert G. Wilson v Sep 25 2006 *)
|
|
CROSSREFS
|
Cf. A010060, A010059, A014571.
Sequence in context: A027731 A024397 A015173 this_sequence A088430 A051240 A003189
Adjacent sequences: A122567 A122568 A122569 this_sequence A122571 A122572 A122573
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 17 2006
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v Sep 25 2006
|
|
|
Search completed in 0.002 seconds
|
