%I#14 2022年9月8日08:45:39

%S 0,0,1,636653368115923169674361156087300993542920927648，

%电话：15154162383745363037553755057070336109907281525116020803993，

%电话：2794484737017281484177766260083280084368101455425127375983

%N a（N）+a（N+1）+a，（N+2）=N^6，a（1）=a（2）=0。

%C0+0+1=1^6；0 + 1 + 63 = 2^6; ...

%H G.C.Greubel，n表，n=1..5000的a（n）</a>

%H<a href=“/index/Rec#order_09”>常系数线性递归的索引条目，签名（6，-15,21，-21，-21,15，-6,1）。

%F来自R.J.Mathar_，2008年12月12日：（开始）

%F a（n）=-26*n/3+20*n^3/3-5*n^2+7/3-2*n^5+n^6/3+5*n*n^4/3-7*A131713（n）/3。

%传真：x^3*（1+x）*（x^4+56*x^3+246*x^2+56*x+1）/（（1-x）^7*（1+x+x^2））。（结束）

%t k0=k1=0；lst={k0，k1}；做[kt=k1；k1=n^6-k1-k0；k0=kt；附加到[lst，k1]，{n，1,5！}]；第一次试验

%t线性递归〔｛6，-15，21，-21，21，-21，15，-6，1｝，｛0，0，1，63，665，3368，11592，31696，74361｝，5000〕

%t系数表[系列[x^2*（1+x）*（x^4+56*x^3+246*x ^2+56*x+1）/（（1-x）^7*（1+x+x^2）），{x，0，5000}]，x]（*_Stefano Spezia_，2018年9月2日*）

%o（PARI）x='x+o（'x^30）；concat（[0,0]，Vec（x^3*（1+x）*（x^4+56*x^3+246*x^2+56*x+1）/（（1-x）^7*（1+x+x^2）））\\_G.C.格雷贝尔，2018年9月1日

%o（岩浆）m:=30；R<x>：=PowerSeriesRing（整数（），m）；[0,0]cat系数（R！（x^3*（1+x）*（x^4+56*x^3+246*x*2+56*x+1）/（（1-x）^7*（1+x+x^2））；//_G.C.Greubel，2018年9月1日

%Y请参阅A152728、A152729、A152730、A15272、A1521726、A000212。

%K nonn公司

%O 1,4型

%A _弗拉迪米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基（Joseph Stephan Orlovsky），2008年12月11日