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 A173756 #27 May 07 2020 06:17:33
%S A173756 1,2,7,14,61,98,417,950,2829,4456,24873,42980,306091,543462,595741,
%T A173756 691290,2459767,4092108,37557035,193242042,360012409,516201296,
%U A173756 4341338257,7943382348,27024448579,45075855410,102204647503,109956141102,346222803073,571398562364
%N A173756 Partial sums of A058313.
%C A173756 Partial sum of the numerator of the n-th alternating harmonic number.
%F A173756 a(n) = Sum_{i=1..n} A058313(i) = Sum_{i=1..n} numerator(Sum_{k=1..i} (-1)^(k+1)/k). [Corrected by _Petros Hadjicostas_ and _Michel Marcus_, May 06 2020]
%p A173756 a := proc(n) local i, k:
%p A173756 add(numer(add((-1)^(k + 1)/k, k = 1 .. i)), i = 1 .. n): end proc:
%p A173756 seq(a(n), n = 1 .. 40); # _Petros Hadjicostas_, May 06 2020
%o A173756 (PARI) a(n) = sum(i=1, n, numerator(sum(k=1, i, (-1)^(k+1)/k))); \\ _Michel Marcus_, May 07 2020
%Y A173756 Cf. A001008 (numerator of the n-th harmonic number), A025530, A058312 (denominators of the underlying sequence), A058313, A075830.
%K A173756 easy,nonn
%O A173756 1,2
%A A173756 _Jonathan Vos Post_, Feb 23 2010
%E A173756 Data corrected and extended by _Petros Hadjicostas_, May 06 2020