login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A034855 Triangle read by rows giving number of rooted labeled trees with n >= 2 nodes and height d >= 1. 9
2, 3, 6, 4, 36, 24, 5, 200, 300, 120, 6, 1170, 3360, 2520, 720, 7, 7392, 38850, 43680, 22680, 5040, 8, 50568, 475776, 757680, 551040, 221760, 40320, 9, 372528, 6231960, 13747104, 12836880, 7136640, 2358720, 362880, 10, 2936070, 87530400, 264181680 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

2,1

LINKS

Alois P. Heinz, Rows n = 2..101, flattened

Marko Riedel, Counting the number of rooted trees of a certain height

Marko Riedel, Maple code for sequence (EGF)

J. Riordan, Enumeration of trees by height and diameter, IBM J. Res. Dev. 4 (1960), 473-478. [broken link]

J. Riordan, Enumeration of trees by height and diameter, IBM J. Res. Dev. 4 (1960), 473-478.

J. Riordan, The enumeration of trees by height and diameter, IBM Journal 4 (1960), 473-478. (Annotated scanned copy)

Index entries for sequences related to trees

FORMULA

Riordan reference gives recurrence.

EXAMPLE

2;

3,    6;

4,   36,    24;

5,  200,   300,   120;

6, 1170,  3360,  2520,   720;

7, 7392, 38850, 43680, 22680, 5040;

MAPLE

gf:= proc(k) gf(k):= `if`(k=0, x, x*exp(gf(k-1))) end:

A:= proc(n, k) A(n, k):= n!*coeff(series(gf(k), x, n+1), x, n) end:

T:= (n, d)-> A(n, d) -A(n, d-1):

seq(seq(T(n, d), d=1..n-1), n=2..12);  # Alois P. Heinz, Sep 21 2012

MATHEMATICA

gf[k_] := gf[k] = If[k == 0, x, x*E^gf[k - 1]]; a[n_, k_] := n!*Coefficient[ Series[gf[k], {x, 0, n + 1}], x, n]; t[n_, d_] := a[n, d] - a[n, d - 1]; Table[t[n, d], {n, 2, 12}, {d, 1, n - 1}] // Flatten (* Jean-Fran├žois Alcover, Jan 15 2013, translated from Alois P. Heinz's Maple program *)

CROSSREFS

Cf. A001854, A234953, A000435, A236396.

Sequence in context: A096357 A091507 A098282 * A105214 A136315 A011159

Adjacent sequences:  A034852 A034853 A034854 * A034856 A034857 A034858

KEYWORD

nonn,tabl,easy,nice

AUTHOR

N. J. A. Sloane

EXTENSIONS

More terms from Pab Ter (pabrlos(AT)yahoo.com), May 27 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 15:22 EDT 2018. Contains 316388 sequences. (Running on oeis4.)