%I#33 2019年8月8日07:41:59
%S 1,1,2,1,2,3,5,8,8,7,5,2,5,13,12,8,5,6,4,23,21,9,5,2,5,26,14,31,
%电话:3,5,6,4,36,34,9,5,5,39,14,44,3,5,14,4,49,47,9,2,5,52,14,57,3,56,6,
%U 4,62,60,9,5,2,5,65,14,70,3,5,6,4,75,73,9,52,5,78,14,83,3,,5,4,88,86,9,5A,5,91
%N a(1)=a(2)=a⑴=a(5)=1,a(4)=2;当n>5时,a(n)=a(n-a(n-3))+a(n-a(n-4))。
%C递归A(n)=A(n-A(n-3))+A(n-A(n-4))的定义明确的解序列。
%H Robert Israel,<a href=“/A309494/b309494.txt”>n,a(n)表,n=1.-10000</a>
%H<a href=“/index/Rec#order_26”>带常系数线性递归的索引条目</a>,签名(0,0,0,1,0,0-0,00,0.0,0,2,0,0:0,0,0,0,0.0,-1)。
%F对于k>1,
%F a(13*k-9)=13*k-8,
%F a(13*k-8)=3,
%F a(13*k-7)=5,
%F a(13*k-6)=6,
%F a(13*k-5)=4,
%Fa(13*k-4)=13*k-3,
%F a(13*k-3)=13*k-5,
%F a(13*k-2)=9,
%F a(13*k-1)=5,
%F a(13*k)=2,
%Fa(13*k+1)=5,
%F a(13*k+2)=13*k,
%F a(13*k+3)=14。
%F From _Colin Barker_,2019年8月5日:(开始)
%传真:x*(1+x+x^2+2*x^3+x^4+2*x*5+3*x^6+5*x^7+8*x^8+8*x*9+7*x^10+5*x ^11+2*x ^12+3*x ^13+11*x^14+10*x^15+14*x^16+x^17+x^18-6*x^20+7*x ^21+5*x*^22-5*x^23-5*x ^24-2*x^25-4*x^26+x^ 27-9*x^28-3*x^29-2*x^30-3*x ^31-3*x^32+x^33-2*x ^34-2*x^36-2*x ^41)/((1-x)^2*(1+x+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10+x^11+x^12)^2)。
%当n>42时,F a(n)=2*a(n-13)-a(n-26)。
%F(完)
%对于从1到5的n,p执行a[n]:=`if`(n=4,2,1)od:
%对于从6到100的n,p做a[n]:=a[n-a[n-3]]+a[n-a[n-4]od:
%p序列(a[n],n=1..100);#_罗伯特·伊斯雷尔,2019年8月7日
%ta[1]=a[2]=a[3]=a[5]=1;a[4]=2;a[n]:=a[n]=a[n-a[n-3]]+a[n-a[n-4];阵列[a,93](*Giovanni Resta_,2019年8月7日*)
%o(PARI)q=矢量(100);q[1]=q[2]=q[3]=q[5]=1;q[4]=2;对于(n=6,#q,q[n]=q[n-q[n-3]]+q[n-q[n-4]);q个
%o(PARI)向量26+x^27-9*x^28-3*x^29-2*x^30-3*x^31-3*x ^32+x^33-2*x ^34-2*x ^36-2*x^41)/((1-x)^2*(1+x+x^2+x^3+x^4+x^5+x^6+x^7+x^8+x^9+x^10+x^11+x^12)^2)+O(x^80))\\科林·巴克尔,2019年8月8日
%Y参见A064657、A244477、A309492。
%K nonn,简单
%O 1,4型
%A Altug Alkan,2019年8月4日
|