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 A112286 #17 Aug 04 2025 05:38:42
%S A112286 1,3,11,7,71,7,17,152,2699,701,691,248,133,137,61933,809,20705,64896,
%T A112286 3587,17449,445,61897,208,20663,1163,982,27281,1871,2466139,44339,
%U A112286 21293609,13417971,6229,54238033,99737,3585191,33583,40756259,5956441
%N A112286 a(n) = numerator of sum of reciprocals of the terms of the continued fraction for H(n) = Sum_{k=1..n} 1/k.
%H A112286 G. C. Greubel, <a href="/A112286/b112286.txt">Table of n, a(n) for n = 1..1000</a>
%H A112286 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/HarmonicNumber.html">Harmonic Number</a>
%H A112286 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ContinuedFraction.html">Continued Fraction</a>
%e A112286 1 +1/2 +1/3 +1/4 +1/5 +1/6 = 49/20 = 2 + 1/(2 + 1/(4 + 1/2)).
%e A112286 So a(6) is 7, the numerator of 7/4 = 1/2 + 1/2 + 1/4 + 1/2.
%t A112286 f[n_] := Plus @@ (1/# &) /@ ContinuedFraction[Sum[1/k, {k, n}]]; Table[Numerator[f[n]], {n, 40}] (* _Ray Chandler_, Sep 06 2005 *)
%Y A112286 m-th harmonic number H(m) = A001008(m)/A002805(m).
%Y A112286 Cf. A055573, A058027, A100398, A110020, A112287.
%K A112286 nonn,frac
%O A112286 1,2
%A A112286 _Leroy Quet_, Sep 01 2005
%E A112286 Extended by _Hans Havermann_ and _Ray Chandler_, Sep 06 2005