a:=proc（n）选项记忆；
如果n<3，则返回[1，2，8][n+1]fi；
（（60-81*n+27*n^2）*a（n-2）+（22*n^2-28*n+6）*a
seq（a（n），n=0..24）；
#备选方案：
gf:=x->（16+8*表皮（[2/3，1/3]，[1/2]，（1+x）*27/32）+
sqrt（18*（1+x））*超几何（[7/6，5/6]，[3/2]，（1+x）*27/32）/48：
ser:=系列（gf（x），x，32）：evalf（%，32）
seq（圆形（系数（%，x，n）），n=0..24）；
#或者：
Gf:=x->（1/（3*sqrt（5-27*x）））*（sqrt+
2*sqrt（2）*cos（（1/6）*arccos（1-（27*（1+x））/16））+
2*sqrt（6）*sin（（1/3）*arcsin（（3/4）*sqrt（3/2）*squart（1+x）））：
ser:=系列（Gf（x），x，32）：evalf（%，32）：
seq（四舍五入（系数（%，x，n）），n=0..24）；
