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 A010341 #10 Jul 20 2025 14:57:27 %S A010341 0,0,1,0,0,2,3,1,0,0,3,2,4,4,1,0,0,4,9,2,6,10,5,1,0,0,5,8,6,2,15,3,4, %T A010341 6,1,0,0,6,4,3,4,2,17,8,8,22,7,1,0,0,7,12,8,12,6,2,8,6,13,4 %N A010341 Sum of all terms except last in period of continued fraction for sqrt(n). %H A010341 T. D. Noe, <a href="/A010341/b010341.txt">Table of n, a(n) for n=1..2000</a> %t A010341 Table[With[{s=Sqrt[n]},If[IntegerQ[s],0,Total[Most[ContinuedFraction[s][[2]]]]]],{n,60}] (* _Harvey P. Dale_, Jul 20 2025 *) %Y A010341 Cf. A010340 %K A010341 nonn %O A010341 1,6 %A A010341 _N. J. A. Sloane_, Walter Gilbert