%I#30 2024年3月15日12:49:08

%S 1,1、-1、-4、-5、1.9、11、-4、-25、-31、9、64,79、-25，-169、-209、64441545、-169、，

%电话-1156，-142944130253739，-1156，-7921，-97913052073625631，-7921，

%电话：54289，-6710520736142129175681，-54289，-372100，-45994114299741691204139

%N a（N）=（a（N-1）*a（N-3）+a（N-2））/a（N-4），a（1）=a（2）=1，a（3）=-1，a（4）=-4。

%C这满足与Dana Scott序列A048736相同的重复性。

%H Reinhard Zumkeller，n的表格，n=1..5000的a（n）</a>

%H<a href=“/index/Rec#order_09”>具有常数的线性递归索引条目，签名（0,0，-2,0,0,2,0,0,1）。

%传真：x*（1+x-x^2-2*x^3-3*x^4-x^5-x^6-x^7）/（1+2*x^3-2*x^6-x^9）。

%对于Z中的所有n，F a（n）=a（-5-n）=a，（n+2）*a，（n-2）-a，（n+1）*a（n-1）。

%F a（3*n）=（-1）^n*F（n）^2，a（3*n+1）=（-1）^n*F（n+2）^2其中F=斐波那契数列A000045。

%F a（6*n-4）=-A110034（2*n），a（6*n-1）=-A11035（2*n），b（3*n+2）=（-1）^n*A126116（2*n+3）。

%e G.f.=x+x^2-x^3-4*x^4-5*x^5+x^6+9*x^7+11*x^8-4*x^9-25*x^10+。。。

%t系数表[级数[x*（1+x）*（1-x^2）*（1+x^3）/（1-2*x^2-2*x^4-2*x^6+x^8），{x，0,50}]，x]（*或*）递归表[{a[n]==（a[n-1]*a[n-3]+a[n-2]）/a[n-4]，a[1]=a[2]=1，a[3]==-1，a[4]=-4}，a，{n，1,50}]（*_G.C.格鲁贝尔，2018年8月12日*）

%o（PARI）{a（n）=我的（k=n\3）；（-1）^k*如果（n%3==0，fibonacci（k）^2，n%3==1，fiboanacci（k+2）^2、fibonaacci（k；

%o（PARI）x='x+o（'x^30）；Vec（x*（1+x）*（1-x^2）*（1+x^3）/（1-2*x^2-2*x^4-2*x^6+x^8））\\ G.C.Greubel_，2018年8月12日

%o（哈斯克尔）

%o a206282 n=a206282_llist！！（n-1）

%o a206282_list=1:1:-1:-4:

%o带div的拉链

%o（zipWith（+））

%o（zipWith（*）（删除3个206282_llist）

%o（删除1 a206282_llist）

%o（删除2 a206282_llist）

%o a206282_列表

%o——与A048736中的程序相同，见注释。

%o——_ Inhard Zumkeller_，2012年2月8日

%o（岩浆）I:=[1,1，-1，-4]；[n le 4选择I[n]其他（自我（n-1）*自我（n-3）+自我（n-2））/自我（n-4）：[1..30]]中的n；//_G.C.Greubel，2018年8月12日

%Y参考A000045、A048736、A110034、A110035、A126116。

%K符号，简单

%O 1,4型

%A _迈克尔·索莫斯，2012年2月5日