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 A024275 #15 Mar 01 2019 16:29:26 %S A024275 0,1,-6,116,-4816,342736,-37272576,5748462656,-1193465153536, %T A024275 320935235205376,-108513125117853696,45057835625375568896, %U A024275 -22540295648947188269056,13370560809273727964041216 %N A024275 E.g.f: log(1+sinh(x)*sin(x))/2 (even powers only). %e A024275 log(1+sinh(x)*sin(x))/2 = 0 + 1/2*x^2 - 1/4*x^4 + 29/180*x^6 - 43/360*x^8 + 21421/226800*x^10 +- ... . %t A024275 With[{nn=30},Take[CoefficientList[Series[Log[1+Sinh[x]*Sin[x]]/2,{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Mar 01 2019 *) %Y A024275 Cf. A009359. %K A024275 sign %O A024275 0,3 %A A024275 _R. H. Hardin_ %E A024275 Extended with signs, Mar 1997 %E A024275 Prior Mathematica program replaced by _Harvey P. Dale_, Mar 01 2019