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 A144612 #22 May 30 2025 14:29:15 %S A144612 1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1,1, %T A144612 0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0, %U A144612 1,1,0,1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1,1,0,1,1,0,1,1,0,1,0,1 %N A144612 Sturmian word of slope (3-sqrt(3))/2. %C A144612 Since 1 - (3-sqrt(3))/2 has a periodic continued fraction expansion with period 21, (a(n)) is the unique fixed point of the morphism 0 -> 10110, 1 -> 101. - _Michel Dekking_, Feb 05 2017 %C A144612 Also, sequence of (1 if x is integer, else 0) as x runs over the elements of N U N*sqrt(3) in increasing order, N = {1, 2, 3, ...}. - _M. F. Hasler_, Feb 06 2025 %D A144612 J.-P. Allouche and J. Shallit, Automatic Sequences, Cambridge Univ. Press, 2003, p. 286. %H A144612 Michel Dekking, <a href="/A144612/b144612.txt">Table of n, a(n) for n = 1..2000</a> %F A144612 a(n) = floor((n+1)r) - floor(nr), where r = (3-sqrt(3))/2. %F A144612 a(n) = 2 - A245222(n). - _M. F. Hasler_, Feb 06 2025 %t A144612 Table[(Floor[(n + 1) (3 - Sqrt[3])/2] - Floor[n (3 - Sqrt[3])/2]), {n, 100}] (* _Vincenzo Librandi_, Feb 05 2017 *) %o A144612 (Magma) [Floor((n+1)*(3-Sqrt(3))/2)-Floor(n*(3-Sqrt(3))/2): n in [1..100]]; // _Vincenzo Librandi_, Feb 05 2017 %Y A144612 Cf. A188082, A074065. %Y A144612 Cf. A245222 (= 2 - a(n)), %K A144612 nonn %O A144612 1,1 %A A144612 _N. J. A. Sloane_, Jan 13 2009 %E A144612 Corrected and extended by _Michel Dekking_, Feb 05 2017