%I #8 Jan 09 2021 22:12:09
%S 1,3,9,30,111,424,1705,7024,29692,127748,558219,2469403,11039992,
%T 49796803,226348740,1035750855,4767429667,22058219466,102534463563,
%U 478602668159,2242383155726,10541976883286,49714185649417,235109360767014,1114782699692044,5298494249055391
%N Number of rooted bicolored trees on n unlabeled nodes such that every white node is adjacent to a black node.
%H Andrew Howroyd, <a href="/A339835/b339835.txt">Table of n, a(n) for n = 1..500</a>
%e a(1) = 1: B.
%e a(2) = 4: B(B), B(W), W(B).
%e a(3) = 9: B(BB), B(BW), B(WW), W(BB), B(B(B)), B(B(W)), B(W(B)), W(B(B)), W(B(W)).
%o (PARI) EulerT(v)={Vec(exp(x*Ser(dirmul(v,vector(#v,n,1/n))))-1, -#v)}
%o seq(n)={my(u=v=w=[]); for(n=1, n, my(t1=EulerT(v), t2=EulerT(u+v)); u=concat([1], EulerT(u+v+w)); v=concat([0], t2-t1); w=concat([1], t1)); u+v}
%Y Cf. A038055 (rooted bicolored trees), A339831, A339834 (unrooted), A339838.
%K nonn
%O 1,2
%A _Andrew Howroyd_, Dec 19 2020