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 A094421 #21 Sep 08 2022 08:45:13 %S A094421 13,74,219,484,905,1518,2359,3464,4869,6610,8723,11244,14209,17654, %T A094421 21615,26128,31229,36954,43339,50420,58233,66814,76199,86424,97525, %U A094421 109538,122499,136444,151409,167430,184543,202784,222189,242794 %N A094421 a(n) = n * (6*n^2 + 6*n + 1). %C A094421 Third column of array A094416. %H A094421 G. C. Greubel, <a href="/A094421/b094421.txt">Table of n, a(n) for n = 1..1000</a> %H A094421 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (4,-6,4,-1). %F A094421 Equals n * A003154(n) (star numbers). %F A094421 G.f.: x*(13 + 22*x + x^2)/(1-x)^4. - _Colin Barker_, Aug 02 2012 %F A094421 E.g.f.: x*(13 + 24*x + 6*x^2)*exp(x). - _G. C. Greubel_, Oct 30 2019 %p A094421 A094421:=n->n * (6*n^2 + 6*n + 1); seq(A094421(n), n=1..40); # _Wesley Ivan Hurt_, Feb 12 2014 %t A094421 Table[n(6n^2+6n+1), {n, 40}] (* _Wesley Ivan Hurt_, Feb 12 2014 *) %t A094421 LinearRecurrence[{4,-6,4,-1},{13,74,219,484},40] (* _Harvey P. Dale_, Jan 04 2016 *) %o A094421 (PARI) vector(40, n, n*(6*n^2+6*n+1)) \\ _G. C. Greubel_, Oct 30 2019 %o A094421 (Magma) [n*(6*n^2+6*n+1): n in [1.40]]; // _G. C. Greubel_, Oct 30 2019 %o A094421 (Sage) [n*(6*n^2+6*n+1) for n in (1..40)] # _G. C. Greubel_, Oct 30 2019 %o A094421 (GAP) List([1..40], n-> n*(6*n^2+6*n+1)); # _G. C. Greubel_, Oct 30 2019 %K A094421 nonn,easy %O A094421 1,1 %A A094421 _Ralf Stephan_, May 02 2004