%I #17 Sep 08 2022 08:44:50
%S 1,28,511,7762,107065,1397536,17652307,218558494,2673170269,
%T 32451457324,392152259863,4725695939146,56851786048513,
%U 683251595827192,8206387016186779,98529159613684918,1182723165477092197,14195324589704967940,170362624423844562655
%N Expansion of 1/((1-3*x)*(1-6*x)*(1-7*x)*(1-12*x)).
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (28,-273,1098,-1512).
%F a(n) = (2*12^(n+3)-27*7^(n+3)+30*6^(n+3)-5*3^(n+3))/540. - _Yahia Kahloune_, Jun 10 2013
%F a(n) = 28*a(n-1)-273*a(n-2)+1098*a(n-3)-1512*a(n-4). - _Wesley Ivan Hurt_, Oct 21 2014
%p A028078:=n->(2*12^(n+3)-27*7^(n+3)+30*6^(n+3)-5*3^(n+3))/540: seq(A028078(n), n=0..20); # _Wesley Ivan Hurt_, Oct 21 2014
%t CoefficientList[Series[1/((1 - 3 x) (1 - 6 x) (1 - 7 x) (1 - 12 x)), {x, 0, 20}], x] (* _Wesley Ivan Hurt_, Oct 21 2014 *)
%t LinearRecurrence[{28,-273,1098,-1512},{1,28,511,7762},20] (* _Harvey P. Dale_, Oct 10 2020 *)
%o (Magma) [(2*12^(n+3)-27*7^(n+3)+30*6^(n+3)-5*3^(n+3))/540 : n in [0..20]]; // _Wesley Ivan Hurt_, Oct 21 2014
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_.
|