%I#35 2023年3月5日12:40:31
%S 0,0,0,12,2,4,8,12,20,34,54,881442323766109861596258441806764,
%电话:1094617710286564636875024121392196418317810514228832040,
%电话:1346268217830835245785702886922746414930352215781639088168
%N a(N)=斐波那契(N)-(斐波那奇(N)mod 2)。
%C也是n>4的(n-2)-斐波那契立方体图的周长_Eric W.Weisstein_,2017年9月3日
%H Robert Israel,n的表,a(n)表示n=0..4781</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/FibonacciCubeGraph.html“>Fibonacci立方体图。
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/Graph圆周.html“>图形周长</a>。
%H<a href=“/index/Rec#order_05”>具有常系数的线性重复出现的索引条目,签名(1,1,1,-1,-1)。
%F a(n)=2*A004695(n).-_R.J.Mathar,2010年7月23日
%财务报表:2*x^3/((1-x)*(1+x+x^2)*(1-x-x^2_R.J.Mathar,2010年7月23日
%F a(n)=a(n-1)+a(n-2)+a_Eric W.Weisstein_,2017年9月3日
%F a(n)=斐波那契(n)-A011655(n).-_David A.Corneth,2018年3月25日
%F a(n)=(1/3)*(-2+3*斐波那契(n)+2*切比雪夫U(n,-1/2)+切比雪夫U(n-1,-1/2_G.C.Greubel,2022年7月8日
%p f:=gfun:-rerectproc({a(n)=a(n-1)+a(n-2)+a(n-3)-a(n-4)-a(n-5),
%p序列(a(i)=[0,0,0,2,2][i+1],i=0..4)},a(n),记住):
%p映射(f,[$0..50]);#_罗伯特·伊斯雷尔,2018年3月25日
%t2*层[Fibonacci[Range[0,50]]/2](*_Eric W.Weisstein_,2017年9月3日*)
%t表[2/3(Cos[2n*Pi/3]-1)+Fibonacci[n],{n,0,50}](*_Eric W.Weisstein_,2017年9月3日*)
%t表[(I^n*LucasL[n,I]-2)/3+斐波纳契[n],{n,0,50}](*_Eric W.Weisstein_,2018年3月25日*)
%t线性递归[{1,1,1,-1,-1},{0,0,2,2},51](*_Eric W.Weisstein_,2017年9月3日*)
%t系数列表[系列[(2x^3)/(1-x-x^2-x^3+x^4+x^5),{x,0,20}],x](*_Eric W.Weisstein_,2017年9月3日*)
%o(PARI)a(n)=2*(斐波那契(n)\2);\\_阿尔图格·阿尔坎,2018年3月25日
%o(岩浆)[2*Floor(Fibonacci(n)/2):n in[0.40]];//_G.C.Greubel,2022年7月8日
%o(SageMath)[2*(fibonacci(n)//2)for n in(0..40)]#_G.C.Greubel_,2022年7月8日
%Y参见A000045、A004695、A011655、A049347。
%K nonn,简单
%0、4
%A _Roger L.Bagula,2005年3月14日