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 A237873 #17 Sep 08 2022 08:46:06
%S A237873 1,1,2,3,12,5,20,105,280,63,2520,385,5544,6435,8008,45045,144144,
%T A237873 85085,116688,2909907,739024,146965,232792560,37182145,356948592,
%U A237873 128707425,2974571600,717084225,80313433200,215656441,30247916400,4512611027925,486207248800
%N A237873 Denominator of Sum_{i=1..n} n^i/i.
%C A237873 The sequence gives the denominators of -n^(n+1)*Phi(n,1,n+1)-log(-n+1) for n>1, where Phi is the Lerch transcendent.
%H A237873 Bruno Berselli, <a href="/A237873/b237873.txt">Table of n, a(n) for n = 1..200</a>
%t A237873 f[n_] := Sum[n^i/i, {i, 1, n}]; Table[Denominator[f[n]], {n, 1, 40}]
%o A237873 (Magma) terms:=40; s:=[&+[n^i/i: i in [1..n]]: n in [1..terms]]; [Denominator(s[n]): n in [1..terms]];
%Y A237873 Cf. A236772, A237872 (numerators)
%K A237873 nonn,frac
%O A237873 1,3
%A A237873 _Bruno Berselli_, Feb 14 2014