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 A009432 #16 Sep 08 2023 04:04:29 %S A009432 0,1,-1,-1,0,9,-45,447,-2744,17553,-171585,1757535,-19723176, %T A009432 245370969,-3189613245,44636677407,-674857335120,10851333193249, %U A009432 -185485926579489,3356664148618047,-64009236131219760,1284480775318317225 %N A009432 Expansion of e.g.f. log(1+x)/cosh(sinh(x)). %H A009432 G. C. Greubel, <a href="/A009432/b009432.txt">Table of n, a(n) for n = 0..449</a> %t A009432 With[{m=30}, CoefficientList[Series[Log[1+x]/Cosh[Sinh[x]], {x,0,m}], x]*Range[0, m]!] (* modified by _G. C. Greubel_, Sep 08 2023 *) %o A009432 (Magma) %o A009432 R<x>:=PowerSeriesRing(Rationals(), 30); %o A009432 [0] cat Coefficients(R!(Laplace( Log(1+x)/Cosh(Sinh(x)) ))); // _G. C. Greubel_, Sep 08 2023 %o A009432 (SageMath) %o A009432 def A009432_list(prec): %o A009432 P.<x> = PowerSeriesRing(QQ, prec) %o A009432 return P( log(1+x)/cosh(sinh(x)) ).egf_to_ogf().list() %o A009432 A009432_list(31) # _G. C. Greubel_, Sep 08 2023 %Y A009432 Cf. A009405 - A009420, A009422 - A009431, A009433 - A009439. %K A009432 sign,easy %O A009432 0,6 %A A009432 _R. H. Hardin_ %E A009432 Extended with signs by _Olivier Gérard_, Mar 15 1997