%I#22 2016年3月1日04:45:43
%S 1,2,2,6,20,6927010264120167947023029830612889125642559,
%电话:2500775611199892050634890223083384561060235734649026021552,
%电话:22808548686106702021033950169827662022369864008135611242573859253541402665282559204304109868
%N具有2-颜色节点的标识树的数量。
%H Alois P.Heinz,n的表格,n=0..500时的a(n)</a>
%H<a href=“/index/Tra#trees”>为与树相关的序列索引条目</a>
%F G.F.:B(x)-B^2(x)/2-B(x^2)/2,其中B(x。
%F a(n)~c*d^n/n^(5/2),其中d=A246312=5.2490324912281705791649522161843092…,c=0.356142078281568492877259973613_瓦茨拉夫·科特索维奇,2014年9月6日
%p b:=proc(n,i)选项记忆`如果`(n=0,1,`如果`(i<1,0,
%p加(二项式(2*b(i-1$2),j)*b(n-i*j,i-1),j=0..n/i))
%p端:
%pa:=n->`如果`(n=0,1,2*b(n-1$2)-2*add(b(j-1$2)*b
%p,j=1..n-1)-`if`(irem(n,2,'r')=0,b(r-1$2),0)):
%p序列(a(n),n=0..35);#_Alois P.Heinz,2013年8月2日
%tb[n_,i_]:=b[n,i]=如果[n==0,1,如果[i<1,0,和[二项式[2*b[i-1,i-1],j]*b[n-i*j,i-1]{j,0,n/i}]];
%t a[n_]:=如果[n==0,1,2*b[n-1,n-1]-2*和[b[j-1,j-1]*b[n-j-1,n-j-1],{j,1,n-1}]-如果[Mod[n,2]=0,r=n/2;b[r-1,r-1],0]];
%t表[a[n],{n,0,35}](*_Jean-François Alcover_,2016年3月1日,在_Alois P.Heinz_*之后)
%Y参考A000220。A038077-a030080。
%Y参考A246312。
%K nonn公司
%0、2
%A _克里斯蒂安·G·鲍尔,1999年1月4日
|