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 A072977 #13 Aug 05 2024 14:57:11
%S A072977 1,4,20,39,94,636,699,716,904,1374,1824,2457,24007,32164,170306,
%T A072977 179545,198107,463343,579913,910774,3758763,3896343,5800335,11314629,
%U A072977 13245450,14422622,62449915
%N A072977 Increasing partial quotients of w = 2*cos(Pi/7).
%C A072977 w satisfies w3 - w2 - 2w + 1 = 0 and so is algebraic.
%e A072977 w = 1.801937735804838252472204639014890102331838324263714300...
%t A072977 a = ContinuedFraction[2*Cos[Pi/7], 10^6]; b = 0; Do[ If[a[[n]] > b, b = a[[n]]; Print[b]], {n, 1, 10^6 - 1}]
%Y A072977 Continued fraction: A039921.
%K A072977 nonn,more
%O A072977 1,2
%A A072977 Alastair Rucklidge (A.M.Rucklidge(AT)leeds.ac.uk) and _Robert G. Wilson v_, Aug 13 2002
%E A072977 a(22)-a(27) from _Robert G. Wilson v_, Jun 12 2013.