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 A071862 #16 Aug 30 2019 04:17:00
%S A071862 1,2,2,3,2,1,2,3,3,3,2,2,2,4,4,3,2,2,2,2,4,5,2,2,3,6,3,1,2,3,2,3,3,5,
%T A071862 5,5,2,6,5,2,2,3,2,3,5,5,2,5,3,4,4,5,2,3,4,2,4,5,2,3,2,6,6,3,6,3,2,5,
%U A071862 5,3,2,5,2,6,7,4,3,3,2,3,3,5,2,3,6,6,6,2,2,4,3,5,6,5,4,5,2,6,6,5,2,3,2,2,5
%N A071862 Number of elements in the continued fraction for Sum_{d|n} 1/d.
%H A071862 Antti Karttunen, <a href="/A071862/b071862.txt">Table of n, a(n) for n = 1..65537</a>
%F A071862 It seems that Sum_{k=1..n} a(k) ~ C*n*log(n) with C = 0.6....
%e A071862 Sum_{d|48} 1/d = 31/12, whose continued fraction is [2, 1, 1, 2, 2] with 5 elements, hence a(48)=5.
%t A071862 a[n_] := Length@ContinuedFraction[DivisorSigma[1, n]/n]; Array[a, 100] (* _Amiram Eldar_, Aug 30 2019 *)
%o A071862 (PARI) for(n=1,150,print1(length(contfrac(sumdiv(n,d,1/d))),","))
%Y A071862 Cf. A017665, A017666, A071864.
%K A071862 nonn
%O A071862 1,2
%A A071862 _Benoit Cloitre_, Jun 09 2002