This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A190048 #16 Jun 02 2025 04:04:33
%S A190048 8,46,150,370,770,1428,2436,3900,5940,8690,12298,16926,22750,29960,
%T A190048 38760,49368,62016,76950,94430,114730,138138,164956,195500,230100,
%U A190048 269100,312858,361746,416150,476470,543120,616528,697136,785400,881790,986790,1100898
%N A190048 Expansion of (8+6*x)/(1-x)^5.
%C A190048 Equals the fifth right hand column of A175136.
%H A190048 Vincenzo Librandi, <a href="/A190048/b190048.txt">Table of n, a(n) for n = 0..1000</a>
%H A190048 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (5,-10,10,-5,1).
%F A190048 G.f.: (8+6*x)/(1-x)^5.
%F A190048 a(n) = 8*binomial(n+4,4) + 6*binomial(n+3,4).
%F A190048 a(n) = A091894(4,0)*binomial(n+4,4) + A091894(4,1)*binomial(n+3,4).
%F A190048 a(n) = (7*n^4 +58*n^3 +173*n^2 +218*n +96)/12.
%p A190048 A190048 := proc(n) option remember; a(n):=(7*n^4+58*n^3+173*n^2+218*n+96)/12 end: seq(A190048(n),n=0..35);
%t A190048 LinearRecurrence[{5,-10,10,-5,1}, {8,46,150,370,770}, 30] (* or *) CoefficientList[Series[(8+6*x)/(1-x)^5, {x, 0, 50}], x] (* _G. C. Greubel_, Jan 10 2018 *)
%o A190048 (Magma) [(7*n^4+58*n^3+173*n^2+218*n+96)/12: n in [0..50]]; // _Vincenzo Librandi_, May 07 2011
%o A190048 (PARI) x='x+O('x^30); Vec((8+6*x)/(1-x)^5) \\ _G. C. Greubel_, Jan 10 2018
%o A190048 (PARI) for(n=0,50, print1((7*n^4 +58*n^3 +173*n^2 +218*n +96)/12, ", ")) \\ _G. C. Greubel_, Jan 10 2018
%Y A190048 Cf. A175136, A162148, A190049.
%Y A190048 Related to A000332 and A091894.
%K A190048 nonn,easy
%O A190048 0,1
%A A190048 _Johannes W. Meijer_, May 06 2011