%I#34 2022年9月8日08:45:30
%S 0,1,3,6,10,15,15,16,18,21,25,30,30,31,33,36,40,45,45,46,48,51,55,60,
%电话:60,61,63,66,70,75,75,76,78,81,85,90,90,91,93,96100105106108,
%电话:11111 5120121213126130131351316138141145150151153
%N a(N)=Sum_{k=0..N}(k mod 6)(A010875的部分和)。
%C设A是由A[1,j]=j mod 6,A[i,i]=1,A[i,i-1]=-1定义的Hessenberg n X n矩阵。那么,对于n>=1,a(n)=det(a).-_米兰Janjic_,2010年1月24日
%H Shawn A.Broyles,n的表,n=0..1000的A(n)</a>
%H<a href=“/index/Rec#order_07”>具有常系数的线性递归索引条目,签名(1,0,0,0,1,-1)。
%F a(n)=15*楼层(n/6)+A010875(n)*(A010875)+1)/2。
%F G.F.:(总和{k=1..5}k*x^k)/((1-x^6)*(1-x))=x*(1-6*x^5+5*x^6(1-x*x^3)。
%p序列(系数(级数(x*(1-6*x^5+5*x^6)/(1-x^6,*(1-x)^3),x,n+1),x、n),n=0。。70); # _G.C.Greubel,2019年8月31日
%t累加[Mod[Range[0,70],6]](*或*)累加[PadRight[{},70,Range[0.5]](*H arvey P.Dale_,2016年7月12日*)
%o(PARI)a(n)=总和(k=0,n,k%6);\\_米歇尔·马库斯,2018年4月28日
%o(PARI)a(n)=n6*15+二项式(n%6+1,2)\\查尔斯·格里特豪斯四世,2022年1月24日
%o(岩浆)I:=[0,1,3,6,10,15,15];[n le 7选择I[n]else Self(n-1)+Self_G.C.Greubel,2019年8月31日
%o(鼠尾草)
%o定义A130484_list(prec):
%o P.<x>=PowerSeriesRing(ZZ,prec)
%o返回P(x*(1-6*x^5+5*x^6)/((1-x^6,*(1-x)^3)).list()
%o A130484_list(70)#_G.C.格鲁贝尔,2019年8月31日
%o(间隙)a:=[0,1,3,6,10,15,15];;对于[8..71]中的n,执行a[n]:=a[n-1]+a[n-6]-a[n-7];od;a、 #个_G.C.Greubel,2019年8月31日
%Y参考A010872、A010873、A010874、A010876、A010877、A130481、A130482、A130483、A130485。
%K nonn,简单
%0、3
%2007年5月31日,A _铁杉