%I M3479 N1414#35 2021年1月3日04:30:43
%S 1,4,14,441333881116316883825100703341968245506561540832,
%电话431419012089368339115439522876026727771547535794202123637318,
%电话:5991571428169239294064785742541613547875730838392964378010891182431283092612497260
%有根树枚举器的N四次方:4棵有根树的线性森林。
%D J.Riordan,《组合分析导论》,威利出版社,1958年,第150页。
%D N.J.A.Sloane,《整数序列手册》,学术出版社,1973年(包括该序列)。
%D N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
%H Alois P.Heinz,n的表格,n=4..500的a(n)</a>
%H<a href=“/index/Ro#rooted”>与根树相关的序列的索引项</a>
%F G.F.:B(x)^4,其中B(x)是A000081的G.F。
%传真(n)~4*A187770*A051491^n/n^(3/2)_瓦茨拉夫·科特索维奇,2021年1月3日
%p b:=proc(n)选项记忆;如果n<=1,则n另外加上(k*b(k)*s(n-1,k),k=1..n-1)/(n-1)fi结束:s:=进程(n,k)选项记住;加法(b(n+1-j*k),j=1..iquo(n,k))结束:b:=proc(n)选项记忆;加法(b(k)*x^k,k=1..n)结束:a:=n->系数(级数(b(n-3)^4,x=0,n+1),x,n):序列(a(n),n=4..30);#_Alois P.Heinz,2008年8月21日
%tb[n_]:=b[n]=如果[n<=1,n,和[k*b[k]*s[n-1,k],{k,1,n-1}]/(n-1)];s[n_,k_]:=s[n,k]=和[b[n+1-j*k],{j,1,n/k}];bb[n_]:=bb[n]=和[b[k]*x^k,{k,1,n}];a[n]:=系数[级数[bb[n-3]^4,{x,0,n+1}],x,n];表[a[n],{n,4,31}](*_Jean-François Alcover_,2013年1月25日,翻译自_Alois P.Heinz的Maple程序*)
%A339067的Y列4。
%Y参考A000081、A000106、A000242、A000343、A000395。
%K nonn公司
%氧4.2
%A _N.J.A.斯隆_
%E更多条款摘自克里斯蒂安·G·鲍尔,1999年11月15日
|