A363361 Decimal expansion of real number [1,0,0,1,...] formed by taking the complementary Thue-Morse sequence (A010059) as partial quotients of a continued fraction.
1, 3, 8, 6, 7, 4, 9, 9, 7, 0, 7, 1, 4, 3, 0, 0, 7, 0, 6, 1, 7, 1, 5, 2, 4, 8, 0, 3, 4, 8, 5, 5, 8, 0, 9, 3, 9, 6, 6, 1, 4, 4, 7, 6, 1, 5, 5, 6, 3, 0, 7, 7, 5, 0, 5, 1, 4, 7, 5, 0, 2, 8, 0, 5, 6, 8, 1, 2, 2, 4, 0, 7, 0, 7, 5, 8, 0, 5, 2, 9, 0, 9, 1, 2, 2, 6, 8
Offset: 1
Examples
1.3867499707143007061715248...
Programs
-
Mathematica
First[RealDigits[FromContinuedFraction[1 - ThueMorse[Range[0, 550]]], 10, 100]] (* Paolo Xausa, Apr 04 2024 *)
Comments