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 A009324 #24 Apr 18 2017 07:03:10 %S A009324 0,1,-4,19,-125,1083,-11669,150512,-2262546,38851957,-750394759, %T A009324 16102118954,-380058372572,9785829784651,-272962664838317, %U A009324 8199582838569366,-263901999580713904,9059869807873906105 %N A009324 Expansion of e.g.f. log(1+log(1+x)/exp(x)). %H A009324 Vincenzo Librandi, <a href="/A009324/b009324.txt">Table of n, a(n) for n = 0..200</a> %H A009324 INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=173">Encyclopedia of Combinatorial Structures 173</a> %F A009324 a(n) ~ (n-1)! * (-1)^(n+1) / r^n, where r = 0.46605913165918886499866250745716312978322387778... is the root of the equation exp(exp(-r))*(1-r) = 1. - _Vaclav Kotesovec_, Jan 24 2015 %t A009324 With[{nn=20},CoefficientList[Series[Log[1+Log[1+x]/Exp[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jun 22 2013 *) %K A009324 sign,easy %O A009324 0,3 %A A009324 _R. H. Hardin_ %E A009324 Extended with signs by _Olivier Gérard_, Mar 15 1997 %E A009324 Previous Mathematica program replaced and Definition clarified by _Harvey P. Dale_, Jun 22 2013