%I#11 2020年8月31日05:16:23

%S 1,1,2,111302450630122040777939377914359476669418545776252，

%电话：107254236270068672118900368482007784469163679104677398632520，

%电话：303348177377608050219268656641025186013061542543352040870175109554654256296085507636954980717708273907290678829206902911266889386

%N O.g.f.A（x）满足：[x^N]exp（N*（N+1）*x）/A（x）^（N+1。

%值得注意的是，这个序列完全由整数组成。

%H Paul D.Hanna，n表，n=0..300时的a（n）</a>

%F给定o.g.F.A（x），定义B（x）=A（x/B（x）），则B（x）是A337457的o.g.F.，并且当n>0时满足[x^n]exp（n*（n-1）*x/B（x））=0。

%F a（n）~sqrt（1-c）*2^（2*n-3/2）*n^（n-3/2_瓦茨拉夫·科特索维奇，2020年8月31日

%电子表格：A（x）=1+x+2*x^2+11*x^3+130*x^4+2450*x^5+63012*x^6+2040779*x^7+79377914*x^8+359476694*x^9+185457776252*x^10+。。。

%e定义说明。

%e系数表x^k/k！在exp（n*（n+1）*x）/A（x）^（n+1

%e n=0:[1，-1，-2，-48，-2616，-262080，-41718240，-9630270720，…]；

%e n=1:[1，0，-6，-112，-5592，-547968，-86345120，-1980990912，…]；

%e n=2:[1，3，0，-222，-10728，-958824，-144971712，-32519314080，…]；

%e n=3:[1，8，52，0，-18648，-1693248，-236690784，-50727983616，…]；

%e n=4:[1，15，210，2420，0，-2739720，-399251600，-80125144800，…]；

%e n=5:[1，24，558，12192，221184，0，-616918320，-131299591680，…]；

%e n=6:[1，35，1204，40278，1272768，33597312，0，-196436730672，…]；

%e n=7:[1，48，2280，106688，4869552，210771456，7654459648，0，…]。。。

%e，其中主对角线在初始项后全部为零，说明当n>0时，[x^n]exp（n*（n+1）*x）/A（x）^（n+1）=0。

%e相关系列。

%e定义B（x）=A（x/B（x）），从开始

%e B（x）=1+x+x^2+7*x^3+93*x^4+1859*x^5+49357*x^6+1629227*x^7+64149805*x^8+2929386667*x^9+…+A337457（n）*x ^n+。。。

%然后是系数表x^k/k！在exp（n*（n-1）*x/B（x））中开始：

%e n=0：[1，0，0，0,0，0:0，…]；

%e n=1:[1,0,0,0，0,0,1,0，0，0…]；

%e n=2:[1，2，0，-16，-320，-21888，-2648876，-494325760，…]；

%e n=3:[1，6，24，0，-1728，-88704，-9621504，-1715198976，…]；

%e n=4:[1，12，120，864，0，-281088，-26873856，-4328017920，…]；

%e n=5:[1，20，360，5600，65920，0，-66944000，-10207436800，…]；

%e n=6:[1,30,840,21600,492480,8784000,0，-22098355200，…]；

%e n=7:[1，42，1680，63504，2237760，71229312，1814690304，0，…]。。。

%e，其中主对角线在初始项后全部为零，说明当n>0时，[x^n]exp（n*（n-1）*x/B（x））=0。

%e还应注意，B（x）=x/系列_翻转（x*A（x））和A（x。

%o（PARI）{a（n）=my（a=[1]）；对于（i=1，n，a=concat（a，0）；m=#a；a[m]=Vec（exp（m*（m-1）*x+x*o（x^m））/Ser（a）^m）[m]/m）；a[n+1]}

%o表示（n=0，20，打印1（a（n），“，”）

%Y参见A337457、A304319。

%K nonn公司

%0、3

%A _保罗·D·汉纳，2020年8月28日