A160854 - OEIS

%I #20 Sep 08 2022 08:45:45

%S 1,154,2155,13524,55400,173911,455120,1043547,2164267,4148584,7463281,

%T 12743446,20828874,32804045,50041678,74249861,107522757,152394886,

%U 211898983,289627432,389797276,517318803,677867708,877960831,1125035471

%N Expansion of (1+147*x+1098*x^2+1638*x^3+632*x^4+59*x^5+x^6)/(1-x)^7.

%C Source: the De Loera et al. article and the Haws website listed in A160747.

%H Vincenzo Librandi, <a href="/A160854/b160854.txt">Table of n, a(n) for n = 0..10000</a>

%H <a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (7,-21,35,-35,21,-7,1).

%F a(n) = 149*n^6/30 +81*n^5/4 +337*n^4/8 +142*n^3/3 +3529*n^2/120 +107*n/12 +1. - _R. J. Mathar_, Sep 17 2011

%p seq(coeff(series((1+147*x+1098*x^2+1638*x^3+632*x^4+59*x^5+x^6)/(1-x)^7, x,n+1),x,n),n=0..25); # _Muniru A Asiru_, Apr 29 2018

%t LinearRecurrence[{7,-21,35,-35,21,-7,1}, {1, 154, 2155, 13524, 55400, 173911, 455120}, 30] (* _G. C. Greubel_, Apr 28 2018 *)

%o (Magma) [149*n^6/30 +81*n^5/4 +337*n^4/8 +142*n^3/3 +3529*n^2/120 +107 *n/12 +1: n in [0..30]]; // _Vincenzo Librandi_, Sep 20 2011

%o (PARI) x='x+O('x^30); Vec((1+147*x+1098*x^2+1638*x^3+632*x^4+59*x^5 + x^6)/(1-x)^7) \\ _G. C. Greubel_, Apr 28 2018

%K nonn,easy

%O 0,2

%A _N. J. A. Sloane_, Nov 18 2009