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 A000552 M5159 N2241 #29 Apr 03 2017 04:23:25 %S A000552 24,300,3360,38850,475776,6231960,87530400,1316954430,21173760960, %T A000552 362670636900,6596214691248,126980000240730,2579214238608000, %U A000552 55118036257959600,1235935135837111104,29009023670878484598 %N A000552 Number of labeled rooted trees of height 3 with n nodes. %D A000552 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence). %D A000552 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). %H A000552 J. Riordan, <a href="http://dx.doi.org/10.1147/rd.45.0473">Enumeration of trees by height and diameter</a>, IBM J. Res. Dev. 4 (1960), 473-478. %H A000552 <a href="/index/Ro#rooted">Index entries for sequences related to rooted trees</a> %H A000552 <a href="/index/Tra#trees">Index entries for sequences related to trees</a> %F A000552 E.g.f.: x*(exp(x*exp(x*exp(x)))-exp(x*exp(x))). - _Vladeta Jovovic_, Jan 29 2008 %p A000552 ht := proc(m) local i; [ T0,{seq(T.i=Prod(Z,Set(T.(i+1))),i=0..m-1),T.m=Z},labeled ] end: M[ 5159 ] := n -> count(ht(3),size=n)-count(ht(2),size=n): seq(M[ 5159 ](n), n=4..19); %t A000552 With[{nn=20},Drop[CoefficientList[Series[x(Exp[x Exp[x Exp[x]]]- Exp[x Exp[x]]),{x,0,nn}],x]Range[0,nn]!,4]] (* _Harvey P. Dale_, Oct 01 2011 *) %K A000552 nonn,easy,nice %O A000552 4,1 %A A000552 _N. J. A. Sloane_ %E A000552 More terms from _Paul Zimmermann_, Mar 15 1996