cp's OEIS Frontend

A245437 Expansion of x^5/(x^6-x^4-x^2-x+1).

%I A245437 #17 Sep 08 2022 08:46:08
%S A245437 0,0,0,0,0,1,1,2,3,6,10,17,29,50,86,147,252,432,741,1270,2177,3732,
%T A245437 6398,10968,18802,32232,55255,94723,162382,278369,477204,818064,
%U A245437 1402395,2404105,4121322,7065122,12111635,20762798,35593360,61017175,104600848,179315699
%N A245437 Expansion of x^5/(x^6-x^4-x^2-x+1).
%C A245437 G.f. taken from p. 12 of the Brlek et al. reference.
%H A245437 Vincenzo Librandi, <a href="/A245437/b245437.txt">Table of n, a(n) for n = 0..1000</a>
%H A245437 Srecko Brlek, Andrea Frosini, Simone Rinaldi, Laurent Vuillon, <a href="http://www.combinatorics.org/ojs/index.php/eljc/article/view/v13i1r15">Tilings by translation: enumeration by a rational language approach</a>, The Electronic Journal of Combinatorics, vol. 13 (2006).
%H A245437 <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,0,1,0,-1).
%F A245437 G.f.: x^5/(x^6 - x^4 - x^2 - x + 1).
%F A245437 a(n) = a(n-1) + a(n-2) + a(n-4) - a(n-6) for n>5.
%t A245437 CoefficientList[Series[x^5/(x^6 - x^4 - x^2 - x + 1), {x, 0, 50}], x]
%t A245437 LinearRecurrence[{1, 1, 0, 1, 0, -1}, {0, 0, 0, 0, 0, 1}, 50] (* _Bruno Berselli_, Jul 22 2014 *)
%o A245437 (Magma) [n le 6 select Floor(n/6) else Self(n-1)+Self(n-2)+Self(n-4)-Self(n-6): n in [1..50]];
%Y A245437 Cf. A079500, A175331, A244521, A245185.
%K A245437 nonn,easy
%O A245437 0,8
%A A245437 _Vincenzo Librandi_, Jul 22 2014