|
%I #29 Sep 08 2022 08:46:05
%S 1,1,2,3,5,8,12,19,30,47,74,116,183,288,453,713,1122,1766,2779,4373,
%T 6882,10830,17043,26820,42206,66419,104522,164484,258845,407339,
%U 641021,1008761,1587466,2498162,3931305,6186612,9735741,15320931,24110227,37941757,59708145
%N Expansion of 1/(1 - x - x^2 + x^6 - x^8).
%H G. C. Greubel, <a href="/A225393/b225393.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_08">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,0,0,0,-1,0,1).
%F G.f.: 1/(1 - x - x^2 + x^6 - x^8).
%F a(n) = a(n-1) + a(n-2) - a(n-6) + a(n-8). - _Ilya Gutkovskiy_, Nov 16 2016
%t CoefficientList[Series[1/(1 - x - x^2 + x^6 - x^8), {x, 0, 50}], x]
%t LinearRecurrence[{1,1,0,0,0,-1,0,1},{1,1,2,3,5,8,12,19},50] (* _G. C. Greubel_, Nov 16 2016 *)
%o (PARI) Vec(1/(1-x-x^2+x^6-x^8) + O(x^50)) \\ _G. C. Greubel_, Nov 16 2016
%o (Magma) m:=50; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/(1-x-x^2+x^6-x^8))); // _G. C. Greubel_, Nov 03 2018
%Y Cf. A029826, A117791, A143419, A143438, A143472, A143619, A143644, A147663, A173908, A173911, A173924, A173925, A174522, A175740, A175772, A175773, A175782, A181600, A204631, A225391, A225394, A225482, A225499.
%K nonn,easy
%O 0,3
%A _Roger L. Bagula_, May 06 2013
|
