%I#27 2022年9月8日08:46:21

%S 2,0,1,1,3,1,4,2,7,3,11,5,18,8,29,13,47,21,76,34123,55199,89322，

%电话：14452123384337713646102207987357115975778258493494181，

%电话：15127676524476109463960317711640792865710368246368167761

%N交错卢卡斯数和斐波那契数。

%H Harvey P.Dale，n表，n=0..1000的a（n）</a>

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

%F a（n）=a（n-2）+a（n-4）。

%财务报表：-（x+1）*（x^2-2*x+2）/（x^4+x^2-1）_Alois P.Heinz_，2018年4月23日

%e a（8）=卢卡斯（4）=7；

%e a（9）=斐波那契（4）=3。

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

%p序列（a（n），n=0..60）；#_Alois P.Heinz，2018年4月23日

%t线性递归[{0,1,0,1}，{2,0,1},60]（*Vincenzo Librandi_，2018年4月25日*）

%t使用[{nn=30}，Riffle[LucasL[Range[0，nn]]，Fibonacci[Range[0，nn]]]（*哈维·P·戴尔，2021年2月25日*）

%o（MATLAB）

%o F=零（1，N）；

%o L=一（1，N）；

%o F（2）=1；

%o L（1）=2

%o表示n=3:n

%o F（n）=F（n-1）+F（n-2）；

%o L（n）=L（n-1）+L（n-2）；

%o端

%o A=F；

%o B=L；

%o C=[B；A]；

%o C=C（：）’；

%o摄氏度

%o（Magma）[IsEven（n）select Lucas（n div 2）else斐波那契（（n-1）div2）：n in[0..70]]；//_文森佐·利班迪（Vincenzo Librandi），2018年4月25日

%o（PARI）a（n）=如果（n%2，斐波那契（n\2），斐波纳契（n/2-1）+斐波那奇（n/2+1））；\\_阿尔图格·阿尔坎，2018年4月25日

%Y参考A000045、A000032、A302126。

%K nonn，简单

%0、1

%A_Craig P.White_，2018年4月23日