%I#34 2023年12月12日08:44:30
%S 1,2,4,8,5,-1,-2,-4,-8,-5,1,2,4,1,5,-1-,-2,-4,8,-5,1,2,4,8.5,-1,-2-,-4,
%T-8,-5,1,2,4,8,5,-1,-2,-4,-8,-5,1,2,4,8.5,-1,-2,-4,-8,-5,1,2,4,8,-1,
%U-2、-4、-8、-5,1,2,4,8,5、-1、-2、-4和-8、-5、1,2,4,4,8,1、-2、-4,4、-8
%N周期10:重复[1,2,4,8,5,-1,-2,-4,-8,-5]。
%H<a href=“/index/Rec#order_04”>为具有常数系数的线性递归索引条目</a>,签名(1,-1,-1)。
%F a(n+1)==2*a(n)模态11。
%F a(n)=(1/2-(7*sqrt(5)/10))*cos(Pi*n/5)+)*sin(3*Pi*n/5)_Richard Choulet_,2008年1月4日
%财务报表:(5*x^3+3*x^2+x+1)/(x^4-x^3+x^2-x+1)_R.J.Mathar,2008年1月7日
%当n>3时,F a(n)=a(n-1)-a(n-2)+a(n-3)-a_Wesley Ivan Hurt_,2015年9月19日
%p A135447:=程序(n)操作((n mod 10)+1,[1,2,4,8,5,-1,-2,-4,-8,-5]);结束:序列(A135447(n),n=0..150);#_R.J.Mathar,2009年2月7日
%t PadRight[{},100,{1,2,4,8,5,-1,-2,-4,-8,-5}](*_文森佐·利班迪,2015年9月19日*)
%t线性递归[{1,-1,1,-1},{1,2,4,8},100](*哈维·P·戴尔,2023年6月3日*)
%o(PARI)a(n)=[1,2,4,8,5,-1,-2,-4,-8,-5][n%10+1]\\查尔斯·格里特豪斯IV_,2011年6月2日
%o(岩浆)和cat[[1,2,4,8,5,-1,-2,-4,-8,-5]:n in[0..10]];//_文森佐·利班迪(Vincenzo Librandi),2015年9月19日
%K符号,简单,少
%0、2
%A Paul Curtz,2007年12月14日
%E 2009年2月7日R.J.Mathar_的更多时间
|