|
（PARI）
我的（x='x，y='y，z='z）；
R=1/（1-x-y-z-x*y-y*z-x*y*z）；
诊断（n，expr，var）={
my（a=向量（n））；
对于（i=1，#var，expr=taylor（expr，var[#var-i+1]，n））；
对于（k=1，n，a[k]=expr；
对于（i=1，#var，a[k]=polceoff（a[k]，k-1））；
申报（a）；
};
诊断（10，R，[x，y，z]）
（PARI）\\系统（“wgethttp://www.jjj.de/pari/hypergeom.gpi");
读取（“hypergeom.gpi”）；
N=20；x='x+O（'x^N）；
Vec（hypergeom_sym（[1/12,5/12]，[1]，1728*（3*x^2-47*x+1）*（x-2）^2*x^3/（x^4-20*x^3+78*x^24*x+1
| 