A027445 a(n) = n^4 + n^3 + n^2 + n^1.
0, 4, 30, 120, 340, 780, 1554, 2800, 4680, 7380, 11110, 16104, 22620, 30940, 41370, 54240, 69904, 88740, 111150, 137560, 168420, 204204, 245410, 292560, 346200, 406900, 475254, 551880, 637420, 732540, 837930, 954304, 1082400, 1222980, 1376830, 1544760, 1727604
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
- Index entries for linear recurrences with constant coefficients, signature (5, -10, 10, -5, 1).
Programs
-
GAP
List([0..50],n->n^4+n^3+n^2+n); # Muniru A Asiru, Jul 15 2018
-
Magma
[n^4 + n^3 + n^2 + n^1: n in [0..50]]; // Vincenzo Librandi, Jun 09 2011
-
Maple
seq(n^4+n^3+n^2+n,n=0..50); # Muniru A Asiru, Jul 15 2018
-
Mathematica
lst={};Do[AppendTo[lst, n^4+n^3+n^2+n], {n, 0, 5!}];lst (* Vladimir Joseph Stephan Orlovsky, Nov 20 2008 *) 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 *)
-
PARI
a(n)=n^4+n^3+n^2+n^1 \\ Charles R Greathouse IV, Oct 21 2022
Comments