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 A026066 #20 Dec 04 2024 10:54:24 %S A026066 105,168,246,340,451,580,728,896,1085,1296,1530,1788,2071,2380,2716, %T A026066 3080,3473,3896,4350,4836,5355,5908,6496,7120,7781,8480,9218,9996, %U A026066 10815,11676,12580,13528,14521,15560,16646,17780,18963,20196,21480,22816,24205,25648,27146,28700,30311 %N A026066 dot_product(n,n-1,...2,1)*(7,8,...,n,1,2,3,4,5,6). %H A026066 Vincenzo Librandi, <a href="/A026066/b026066.txt">Table of n, a(n) for n = 7..1000</a> %H A026066 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1). %F A026066 a(n) = (1/6) * (n^2 + 21n - 106) * n. - _Ralf Stephan_, Apr 05 2004 %F A026066 G.f.: x^7*(105-252*x+204*x^2-56*x^3)/(1-x)^4. - _Colin Barker_, Sep 17 2012 %t A026066 CoefficientList[Series[(105 - 252 x + 204 x^2 - 56 x^3)/(1 - x)^4, {x, 0, 60}], x] (* _Vincenzo Librandi_, Oct 17 2013 *) %t A026066 Table[Range[n,1,-1].Join[Range[7,n],Range[6]],{n,7,60}] (* or *) LinearRecurrence[{4,-6,4,-1},{105,168,246,340},50] (* _Harvey P. Dale_, Dec 04 2024 *) %o A026066 (Magma) [n*(n^2+21*n-106)/6: n in [7..60]]; // _Vincenzo Librandi_, Oct 17 2013 %Y A026066 Column 6 of triangle A094415. %K A026066 nonn,easy %O A026066 7,1 %A A026066 _Clark Kimberling_