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

%S 1,154,2287,14735,61227,193897,510420,1175273,2445121,4698328,8468593,

%T 14482711,23702459,37370607,57061054,84733089,122789777,174140470,

%U 242267443,331296655,446072635,592237493,776314056,1005793129

%N Expansion of (1+147*x+1230*x^2+1925*x^3+754*x^4+67*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="/A160853/b160853.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) = 1 +n*(n+1)*(1375*n^4+4022*n^3+6573*n^2+4582*n+1808)/240. - _R. J. Mathar_, Sep 17 2011

%p seq(coeff(series((1+147*x+1230*x^2+1925*x^3+754*x^4+67*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, 2287, 14735, 61227, 193897, 510420}, 40] (* _G. C. Greubel_, Apr 28 2018 *)

%o (Magma) [1 +n*(n+1)*(1375*n^4+4022*n^3+6573*n^2+4582*n+1808)/240: n in [0..30]]; // _Vincenzo Librandi_, Sep 20 2011

%o (PARI) x='x+O('x^30); Vec((1+147*x+1230*x^2+1925*x^3+754*x^4+67*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