cp's OEIS Frontend

A294783 Number of trees with n bicolored nodes and f nodes of the first color. Triangle T(n,f) read by rows, 0<=f<=n.

%I A294783 #67 May 14 2018 16:59:39
%S A294783 1,1,1,1,1,1,1,2,2,1,2,4,6,4,2,3,9,15,15,9,3,6,20,43,51,43,20,6,11,48,
%T A294783 116,175,175,116,48,11,23,115,329,573,698,573,329,115,23,47,286,918,
%U A294783 1866,2626,2626,1866,918,286,47,106,719,2609,5978,9656,11241,9656,5978,2609,719,106,235,1842
%N A294783 Number of trees with n bicolored nodes and f nodes of the first color. Triangle T(n,f) read by rows, 0<=f<=n.
%H A294783 Andrew Howroyd, <a href="/A294783/b294783.txt">Table of n, a(n) for n = 0..1274</a>
%F A294783 T(n,f) = T(n,n-f), flipping all node colors.
%e A294783 The triangle starts
%e A294783     1;
%e A294783     1,   1;
%e A294783     1,   1,   1;
%e A294783     1,   2,   2,    1;
%e A294783     2,   4,   6,    4,    2;
%e A294783     3,   9,  15,   15,    9,    3;
%e A294783     6,  20,  43,   51,   43,   20,    6;
%e A294783    11,  48, 116,  175,  175,  116,   48,  11;
%e A294783    23, 115, 329,  573,  698,  573,  329, 115,  23;
%e A294783    47, 286, 918, 1866, 2626, 2626, 1866, 918, 286, 47;
%e A294783   106, 719,2609, 5978, 9656,11241, 9656,5978,2609,719,106;
%e A294783   235,1842,
%o A294783 (PARI)
%o A294783 R(n, y)={my(v=vector(n)); v[1]=1; for(k=1, n-1, my(p=(1+y)*v[k]); my(q=Vec(prod(j=0, poldegree(p,y), (1/(1-x*y^j) + O(x*x^(n\k)))^polcoeff(p,j)))); v=vector(n, j, v[j] + sum(i=1, (j-1)\k, v[j-i*k] * q[i+1]))); v;}
%o A294783 M(n)={my(B=(1+y)*x*Ser(R(n,y))); 1 + B - (B^2 - substvec(B, [x,y], [x^2,y^2]))/2}
%o A294783 { my(A=M(10)); for(n=0, #A-1, print(Vecrev(polcoeff(A, n)))) } \\ _Andrew Howroyd_, May 12 2018
%Y A294783 Cf. A038056 (row sums), A000055 (diagonal and 1st column), A000081 (subdiagonal and 2nd column), A303833 (3rd column), A303843 (4th column), A304311 (connected graphs), A304489 (rooted).
%K A294783 nonn,tabl
%O A294783 0,8
%A A294783 _R. J. Mathar_, Apr 16 2018
%E A294783 Row 10 completed. - _R. J. Mathar_, Apr 29 2018