approved
editing
proposed
approved
editing
proposed
Vincenzo Librandi, <a href="/A000526/b000526.txt">Table of n, a(n) for n = 05..200</a>
approved
editing
editing
approved
b:= proc(n) option remember; if n<=1 then n else add(k*b(k)* s(n-1, k), k=1..n-1)/(n-1) fi end: s:= proc(n, k) option remember; add(b(n+1-j*k), j=1..iquo(n, k)) end: B:= proc(n) option remember; add (b(k)*x^k, k=1..n) end: a:= n-> coeff (series (B(n-4)^5* (125-204*B(n-4) +118*B(n-4)^2 -24*B(n-4)^3)/ (1-B(n-4))^7, x=0, n+1), x, n): seq (a(n), n=5..23); # Alois P. Heinz, Aug 21 2008
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
<a href="/index/Tra#trees">Index entries for sequences related to trees</a>
<a href="/index/Tra#trees">Index entries for sequences related to trees</a>