%I#64 2023年12月14日05:27:03
%S 0,1,1,0,-1,-1,0,1,0,
%T-1,0,1,0,-1,-1,0,1,0,-1,
%U-1,-1,0,1,0,0,-1,-1,1,0,1,1,0,-1,-1,0,1,0,0
%N周期序列0,1,1,0,-1,-1,。。。
%C A011655中的未签名版本。
%C这是一个强椭圆可除序列t_n,如[Kimberling,p.16]所示,其中x=1,y=0,z=-1_迈克尔·索莫斯(Michael Somos),2019年11月27日
%与切比雪夫多项式相关的序列的索引项</a>
%H<a href=“/index/Rec#order_02”>具有常系数的线性重复出现的索引条目,签名(1,-1)。
%H C.金伯利,<a href=“http://www.fq.math.ca/Scanned/17-1/kimberling1.pdf“>强可除序列与一些猜想,Fib.Quart.,17(1979),13-17。
%对于n>=1,F a(n+1)=a(n)-a(n-1),其中a(0)=0,a(1)=1。
%F G.F.:x*(1+x)/(1+x^3)。
%长度6序列的F Euler变换[1,-1,-1,0,0,1]_迈克尔·索莫斯(Michael Somos),2007年4月15日
%F G.F.A(x)满足:0=F(A(x,A(x^2)),其中F(u,v)=v-u^2+2*u*v-2*u^2*v.-Michael Somos_,2007年4月15日
%F G.F.A(x)满足:0=F(A(x,A(x^3)),其中F(u,v)=v-u^3+3*u*v-3*u^3*v.-Michael Somos_,2007年4月15日
%F a(n)=A010892(n-1)_R.J.Mathar_,2008年2月8日
%F a(n)=A010892(n+5)_Jaume Oliver Lafont_,2008年12月5日
%F a(n)与a(3^e)=0^e相乘,如果p==1(mod 3),a(p^e)=(-1)^e如果p==2(mod3)_迈克尔·索莫斯(Michael Somos),2007年4月15日
%F a(n)=2*sin(n*Pi/3)/sqrt(3).-_Jaume Oliver Lafont_,2008年12月5日
%F From_Wolfdieter Lang,2010年7月18日:(开始)
%F O.g.F.:x/(1-x+x^2)=x*S(x),对于Chebyshev S(n,1)=U(n,1/2)=A010892(n)。
%F a(n)=S(n-1,1)=U(n-1,1/2),S(-1,1)=0。(结束)
%F a(n)=-超几何([-n/2-1,-(n+1)/2],[-n-2],4)_Peter Luschny_,2016年12月17日
%2019年11月27日,Z.-Michael Somos_中所有n的F a(3*n)=0,a(6*n+1)=a(6*n+2)=1,a(6*n+4)=a
%e G.f.=x+x^2-x^4-x^5+x^7+x^8-x^10-x^11+x^13+x^14-x^16+。。。
%t PadRight[{},120,{0,1,0,-1,-1}](*或*)线性递归[{1,-1},{0,1},120](*_哈维P.戴尔,2014年5月8日*)
%t a[n_]:=(-1)^商[n,3]号[Mod[n,2];(*迈克尔·索莫斯,2015年4月26日*)
%t a[n]:={1,1,0,-1,-1,0}[[模式[n,6,1]];(*_Michael Somos,2015年4月26日*)
%o(PARI){a(n)=[0,1,1,0,-1,-1][n%6+1]};
%o(鼠尾草)
%o定义A128834():
%o x,y=0,-1
%o为True时:
%o产量-x
%o x,y=y,-x+y
%o a=A128834();【下一个(a)表示i在范围(40)内】#_Peter Luschny_,2013年7月11日
%o(岩浆)I:=[0,1];[n le 2选择I[n]else Self(n-1)-Self(n-2):n in[1..30]];//_G.C.Greubel,2018年1月14日
%Y仅从A010892偏移。
%Y参考A123331(逆Mobius变换)
%K符号,mult,easy
%0、1
%A _Philippe Deléham,2007年4月13日