1,6个

从R、 J.马萨2019年4月13日：（开始）

关联三角形H{p，j}，p>=1，1<=j<=p，a（n）=和{j=1..p}j*H{p，j}，行和A001678号，开始时间：

1个；

0，0；

0，0，1；

0，0，1；

1，0，1，0，0；

1，1，1，0，0，0；

2，2，1，0，1，0，0；

1，4，2，2，1，0，0，0；

3，4，4，5，2，0，1，0，0；

3，7，7，9，4，4，1，0，0，0；

5，9，15，14，11，9，3，0，1，0，0；

4、14、23、28、25、19、7、6、1、0、0、0；

11、15、39、46、55、38、24、14、5、0、1、0、0；

6、32、54、86、97、86、64、36、11、9、1、0、0、0；

（结束）

N、 J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

n=1..41的n，a（n）表。

F、 哈拉里和E.M.帕尔默，树的一个点是固定的概率，数学。程序。坎布。菲尔。Soc。第407卷第415-1979年。

与根树相关的序列的索引项

与树相关的序列的索引项

Hpj:=过程（Hofxy，p，j）

钴基（Hofxy，x=0，p）；

钴基（%，y=0，j）；

简化（%）；

结束过程：

Hxy:=过程（x，y，pmax，hxyinit）

如果pmax=0，则

x*y；

其他

pp：=1；

p从1到pmax do

t:=1；

对于j从1到p do

t:=t*（1+x^p*y^j+加（x^（k*p），k=2..pmax+1））^Hpj（hxyinit，p，j）；

结束do：

pp:=pp*t；

结束do：

x*y*%/（1+x*y）；

结束if；

结束过程：

hxy:=hxy（x，y，0，0）；

pmax从2到20 do

Hxy（x，y，pmax，Hxy）；

泰勒（%，x=0，pmax+2）；

换算（%，多项式）；

泰勒（%，y=0，pmax+2）；

换算：%hxy；

p从0到pmax do

Ap:=0；

对于j从1到p do

Ap:=Ap+j*Hpj（hxy，p，j）；

结束do：

printf（“%d”，，Ap）；

结束do：

print（）；

结束do：#R、 J.马萨2019年4月13日

Hpj[Hofxy_x，p_u，j}]：=系列系数[系列系数[Hofxy，{x，0，p}]，{y，0，j}]；

Hxy[x，y_x，pMax_x，hxyinit_x]：=如果[pMax==0，x y，pp=1；对于[p=1，p<=p++，t=1；对于[j=1，j<=p，j++，t=t（1+x^p y^j+Sum[x^（k*p），{k，2，pMax+1}]）^Hpj[hxyinit，p，j]]；pp=pp t]；x*y*pp/（1+x y）]；

hxy=hxy[x，y，0，0]；

[为[pMax=2，pMax<=terms-1，pMax++，Print[”pMax=“，pMax]”；sx=系列[Hxy[x，y，pMax，Hxy]，{x，0，pMax+2}]//正常；sy=系列[sx，{y，0，pMax+2}]；Hxy=sy//正常；对于[p=0，p<=pMax，p++，Ap=0；对于[j=1，j<=p，j++++，Ap=Ap=Ap+j=p，j<=p，j+++++，Ap=Ap+j[Hxy，p，j[Hxy，p，j]]]]]；如果[Hxy[y，p，p，p pMax==terms-1，打印[Ap]；Sow[Ap]]]][[2，1]](*让·弗朗索瓦·阿尔科弗2020年3月22日，之后R、 J.马萨*)

囊性纤维变性。A005200型.

上下文顺序：A009849号 A303041型 A103419号*A106526号 A319766飞机 A108516号

相邻序列：A005199号 A005200型 A005201型*A005203型 A005204号 A005205号

不,容易的

N、 斯隆

更多条款来自R、 J.马萨2019年4月13日

经核准的