cp's OEIS Frontend

A152684 a(n) is the number of top-down sequences (F_1, F_2, ..., F_n) whereas each F_i is a labeled forest on n nodes, containing i directed rooted trees. F_(i+1) is proper subset of F_i.

%I A152684 #23 Dec 01 2022 15:30:01
%S A152684 1,2,18,384,15000,933120,84707280,10569646080,1735643790720,
%T A152684 362880000000000,94121726392108800,29658516531078758400,
%U A152684 11159820050604594969600,4942478402320838374195200,2544989406021562500000000000,1507645899890367707813511168000
%N A152684 a(n) is the number of top-down sequences (F_1, F_2, ..., F_n) whereas each F_i is a labeled forest on n nodes, containing i directed rooted trees. F_(i+1) is proper subset of F_i.
%D A152684 Miklos Bona, Introduction to Enumerative Combinatorics, McGraw Hill 2007, Page 276.
%H A152684 Alois P. Heinz, <a href="/A152684/b152684.txt">Table of n, a(n) for n = 1..100</a>
%F A152684 a(n) = n^(n-2)*(n!).
%e A152684 a(1) = 1^(1-2)*(1!) = 1.
%e A152684 a(2) = 2^(2-2)*(2!) = 2.
%e A152684 a(3) = 3^(3-2)*(3!) = 18.
%p A152684 a:= proc(n) option remember; `if`(n=1, 1,
%p A152684       a(n-1)*(n/(n-1))^(n-3)*n^2)
%p A152684     end:
%p A152684 seq(a(n), n=1..20);  # _Alois P. Heinz_, May 16 2013
%t A152684 Table[n^(n - 1) (n - 1)!, {n, 1, 16}]  (* _Geoffrey Critzer_, May 10 2013 *)
%o A152684 (Magma) [Factorial(n-1)*n^(n-1): n in [1..20]]; // _G. C. Greubel_, Nov 28 2022
%o A152684 (SageMath) [factorial(n-1)*n^(n-1) for n in range(1,21)] # _G. C. Greubel_, Nov 28 2022
%Y A152684 Cf. A061711, A066319, A137268.
%K A152684 nonn
%O A152684 1,2
%A A152684 _Fabian Nedic_, Dec 10 2008