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 A024337 #34 Jan 01 2025 00:14:54
%S A024337 0,0,1,-3,13,-70,447,-3297,27576,-257904,2667240,-30226680,372517920,
%T A024337 -4960668960,70986162240,-1086347505600,17705365171200,
%U A024337 -306178316236800,5599477712102400,-107980208561433600,2189837602616832000
%N A024337 Expansion of sinh(log(1+x))*log(1+x)/2.
%F A024337 a(n) = (-1)^n*(n!*h(n)+(n-2)!)/4, n>1, where h(n) = Sum_{k=1..n} 1/k. - _Gary Detlefs_, Jul 31 2010
%F A024337 Conjecture: a(n) = Sum_{k=0..n/2} Stirling1(n,2*k)*k. - _Benedict W. J. Irwin_, Oct 14 2016
%t A024337 With[{nn=20},CoefficientList[Series[Sinh[Log[1+x]]*Log[1+x]/2,{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 16 2016 *)
%Y A024337 Cf. A009575.
%K A024337 sign
%O A024337 0,4
%A A024337 _R. H. Hardin_
%E A024337 Extended with signs, Mar 1997
%E A024337 Prior Mathematica program replaced by _Harvey P. Dale_, Jan 16 2016