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 A009542 #21 May 21 2019 10:18:46
%S A009542 0,1,2,2,4,16,38,104,456,1600,6154,29952,131660,644736,3516334,
%T A009542 18383616,106736272,645554176,3902982930,25645936640,170222268308,
%U A009542 1160636121088,8352824699446,60217271582720,450765801976408
%N A009542 Expansion of e.g.f. sin(x)*exp(sinh(x)).
%C A009542 First negative term is a(35). - _Olivier Gérard_, Mar 15 1997
%H A009542 Andrew Howroyd, <a href="/A009542/b009542.txt">Table of n, a(n) for n = 0..200</a>
%t A009542 With[{nn=30},CoefficientList[Series[Sin[x]*Exp[Sinh[x]],{x,0,nn}],x] Range[ 0,nn]!] (* _Harvey P. Dale_, May 21 2019 *)
%o A009542 (PARI) my(x='x+O('x^40)); Vec(serlaplace(sin(x)*exp(sinh(x)))) \\ _Michel Marcus_, Apr 02 2017
%K A009542 sign,easy
%O A009542 0,3
%A A009542 _R. H. Hardin_
%E A009542 Extended with signs by _Olivier Gérard_, Mar 15 1997
%E A009542 Previous Mathematica program replaced by _Harvey P. Dale_, May 21 2019