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 A027445 #27 Oct 21 2022 21:04:02 %S A027445 0,4,30,120,340,780,1554,2800,4680,7380,11110,16104,22620,30940,41370, %T A027445 54240,69904,88740,111150,137560,168420,204204,245410,292560,346200, %U A027445 406900,475254,551880,637420,732540,837930,954304,1082400,1222980,1376830,1544760,1727604 %N A027445 a(n) = n^4 + n^3 + n^2 + n^1. %C A027445 a(A047203(n)) mod 10 = 0; a(A016861(n)) mod 10 = 4. - _Reinhard Zumkeller_, Oct 23 2006 %H A027445 Vincenzo Librandi, <a href="/A027445/b027445.txt">Table of n, a(n) for n = 0..1000</a> %H A027445 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (5, -10, 10, -5, 1). %p A027445 seq(n^4+n^3+n^2+n,n=0..50); # _Muniru A Asiru_, Jul 15 2018 %t A027445 lst={};Do[AppendTo[lst, n^4+n^3+n^2+n], {n, 0, 5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Nov 20 2008 *) %t A027445 Table[Total[n^Range[4]],{n,0,40}] (* or *) LinearRecurrence[{5,-10,10,-5,1},{0,4,30,120,340},40] (* _Harvey P. Dale_, Jul 01 2017 *) %o A027445 (Magma) [n^4 + n^3 + n^2 + n^1: n in [0..50]]; // _Vincenzo Librandi_, Jun 09 2011 %o A027445 (GAP) List([0..50],n->n^4+n^3+n^2+n); # _Muniru A Asiru_, Jul 15 2018 %o A027445 (PARI) a(n)=n^4+n^3+n^2+n^1 \\ _Charles R Greathouse IV_, Oct 21 2022 %Y A027445 Equals 2 * A071237(n). %Y A027445 Column k=4 of A228275. %K A027445 nonn,easy %O A027445 0,2 %A A027445 _Patrick De Geest_