(MAGMA公司岩浆)m：=30；R<x>：=PowerSeriesRing（整数（），m）；系数（R！（（2*x-1）*（x^2-x+1）/（（x-1）*（1+x）*（x^2-3*x+1）））//G.C.格鲁贝尔2019年1月6日
OEIS服务器: https://oeis.org/edit/global/2944
G.C.Greubel，<a href=“/A192872号/192872元_1.txt“>n、a（n）表，n=0..1000</a>
提出
经核准的
OEIS服务器：已安装新的b文件b192872.txt。旧的b文件现在是b192872_1.txt。
编辑
（1） 数字a、b、c、f影响初始项，但不影响 重现 系数, 哪一个 依赖 只有 在 u个,v（v）,d日,e（电子）.
仅依赖于u、v、d、e的递推系数。
（3） 如果v=0且e=0，则重复顺序为2，且 这个 系数 是 1+d日*u个 和 d日*u个.
系数为1+d*u和d*u。
减少[{p1，q，s，x}]：= 固定点[(秒 多项式商 @@ #1 + 多项式余数 @@ #1 &)[{#1, q个, x个}] &, 第1页]
固定点[多项式商@@#1+
多项式余数@@#1&）[{#1，q，x}]&，p1]
（*第二个程序 ：更一般*）
1,0,三
G.C.Greubel，<a href=“/A192872号/192872元_1.txt“>表格n，a（n）代表n=10..1000个</a>
通用名称：x个*（2*x-1）*（x^2-x+1）/（（x-1）*（1+x）*（x ^2-3*x+1））-R.J.马塔尔2011年10月26日
p（2，x）=1+2倍2*x个^2 -> 3 +2倍2*x个
p（3，x）=1+x+3倍三*x个^3 -> 4 +7倍7*x个
p（4，x）=1+x+2倍2*x个^2 +5倍5*x个^4 -> 13 +18倍18*x个
p（5，x）=1+x+2倍2*x个^2 +3倍三*x个^3 +8倍8*x个^5 -> 30 +49倍49*x个
（*第一个程序*）
u1=表[系数[部分[t，n]，x，0]，{n，1，z}] (* A192872号 *)
(*A192872号*)
u2=表[系数[部分[t，n]，x，1]，{n，1，z}] (* A192873号 *)
(*A192873号*)
（*第一个节目结束; 第二 是 许多的 更多 一般的 *)
（*第二个程序：更通用*）
（PARI）我的（x='x+O（'x^30））；Vec公司(x个*（2*x-1）*（x^2-x+1）/（（x-1）*（1+x）*（x ^2-3*x+1））\\G.C.格鲁贝尔2019年1月6日
（MAGMA）m：=30；R<x>：=PowerSeriesRing（整数（），m）；系数（R(x个*（2*x-1）*（x^2-x+1）/（（x-1）*（1+x）*（x^2-3*x+1）））//G.C.格鲁贝尔2019年1月6日
（鼠尾草）(x个*（2*x-1）*（x^2-x+1）/（（x-1）*（1+x）*（x^2-3*x+1）））系列（x，30）系数（x，稀疏=假）#G.C.格鲁贝尔2019年1月6日
G.C.格鲁贝尔：更改的偏移；修正gf和使用gf的程序。
米歇尔·马库斯：有可能避免间隙输出中的第一个零点吗
米歇尔·马库斯：偏移应该为0？因为p（0，x）=1
