%I#32 2022年9月8日08:46:09

%S 2,1,3,1,1，-1，-9，-7，-31，-17，-57，-23，-47，-1,87,894492719994571201，

%电话287，-393，-967，-5983，-4049，-16377，-8279，-25199，-8641，-100897193，

%电话：70529561432519431396574731319439941336724569，-654751，-703889，-3617721

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

%H Reinhard Zumkeller，n表，n=0..1000的a（n）</a>

%H<a href=“/index/Rec#order_04”>具有常系数的线性重复出现的索引条目，签名（0,3,0，-4）。

%财务报表：（2+x-3*x^2-2*x^3）/（1-3*x*2+4*x^4）。

%对于Z中的所有n，F a（n）=A247487（n）*3^（n==1（mod 4））。

%F a（2*n）=A247563（n）。a（2*n+1）=A247560（n）。

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

%F a（n）=（-1）^楼层（n/2）*H（n，n mod 2，1/2）），其中H（n、a、b）=超几何（[a-n/2，b-n/2]，[1-n]，8）_Peter Luschny_，2019年9月3日

%e总重量=2+x+3*x^2+x^3+x^4-x^5-9*x^6-7*x^7-31*x^8-17*x^9+。。。

%p H:=（n，a，b）->超几何（[a-n/2，b-n/2]，[1-n]，8）：

%p a:=n->`如果`（n<3，[2，1，3][n+1]，（-1）^iqoo（n，2）*H（n，irem（n，2），1/2）：

%p-seq（简化（a（n）），n=0..42）；#_Peter Luschny_，2019年9月3日

%p#第二个Maple程序：

%p a：=n->（<0|1>，<-4|3>>^iquo（n，2，'r'）<[<2，3>，<1，1>][1+r]>）[1,1]：

%p序列（a（n），n=0..42）；#_Alois P.Heinz，2019年9月3日

%t系数列表[系列[（2+x-3*x^2-2*x^3）/（1-3*x*2+4*x^4），{x，0,60}]，x]（*_G.C.Greubel_，2018年8月4日*）

%o（PARI）{a（n）=如果（n<0，n=-n；2^-n，1）*polceoff（（2+x-3*x^2-2*x^3）/（1-3*x*2+4*x^4）+x*o（x^n），n）}；

%o（哈斯克尔）

%o a247564 n=a247564_列表！！n个

%o a247564_list=[2,1,3,1]++zipWith（-）（map（*3）$drop 2 a247564列表）

%o（地图（*4）$a247564_list）

%o——Reinhard Zumkeller，2014年9月20日

%o（岩浆）m:=25；R<x>：=PowerSeriesRing（整数（），m）；系数（R！（（2+x-3*x^2-2*x^3）/（1-3*x^2+4*x^4））；//_G.C.Greubel，2018年8月4日

%Y参见A247487、A247560和A247563。

%K符号，简单

%0、1

%A _迈克尔·索莫斯，2014年9月20日