This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A140514 #18 Feb 16 2025 08:33:08 %S A140514 0,0,0,1,1,2,3,3,4,7,9,11,16,20,27,37,48,65,86,113,151,199,264,351, %T A140514 465,615,815,1081,1431,1897,2513,3328,4409,5842,7739,10251,13581, %U A140514 17990,23832,31572,41824,55404,73395,97229,128800,170625,226030,299425,396655 %N A140514 a(n) = A000931(n+4) - A010060(n). %H A140514 G. C. Greubel, <a href="/A140514/b140514.txt">Table of n, a(n) for n = 0..5000</a> %H A140514 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Thue-MorseSequence.html">Thue-Morse sequence</a>. %F A140514 a(n) = A000931(n+4) - A010060(n). %t A140514 A000931 := LinearRecurrence[{0, 1, 1}, {1, 0, 0}, 500]; Table[A000931[[n + 5]] - ThueMorse[n], {n, 0, 100}] (* _G. C. Greubel_, Jan 14 2018 *) %Y A140514 Cf. A000931, A010060. %K A140514 nonn %O A140514 0,6 %A A140514 _Roger L. Bagula_ and _Gary W. Adamson_, Jul 01 2008 %E A140514 Definition simplified, indices clarified, references converted to links, Nov 16 2010