A168191 a(n) = n^3*(n^10 + 1)/2.

0, 1, 4100, 797175, 33554464, 610351625, 6530347116, 48444505375, 274877907200, 1270932914529, 5000000000500, 17261356072631, 53496602690400, 151437553297225, 396857386628444, 973097534181375, 2251799813687296, 4952289016455425, 10411482432838500

Offset

0,3

Links

Vincenzo Librandi and T. D. Noe, Table of n, a(n) for n = 0..1000 (First 313 terms from Vincenzo Librandi)

Formula

G.f.: x (1 + 4086*x + 739866*x^2 + 22766750*x^3 + 211640655*x^4 + 752810988*x^5 + 1137585708*x^6 + 752810988*x^7 + 211640655*x^8 + 22766750*x^9 + 739866*x^10 + 4086*x^11 + x^12)/(1-x)^14. - Vincenzo Librandi, Jul 16 2016

Mathematica

Table[n^3*(n^10 + 1)/2, {n, 0, 50}] (* G. C. Greubel, Jul 15 2016 *)
CoefficientList[Series[x (1 + 4086 x + 739866 x^2 + 22766750 x^3 + 211640655 x^4 + 752810988 x^5 + 1137585708 x^6 + 752810988 x^7 + 211640655 x^8 + 22766750 x^9 + 739866 x^10 + 4086 x^11 + x^12)/(1-x)^14, {x, 0, 30}], x] (* Vincenzo Librandi, Jul 16 2016 *)

Prog

(Magma) [n^3*(n^10+1)/2: n in [0..50]]; // Vincenzo Librandi, Apr 25 2011

Crossrefs

Sequence in context: A345610 A346327 A043476 * A045036 A345619 A346337

Adjacent sequences: A168188 A168189 A168190 * A168192 A168193 A168194

Keyword

nonn

Author

N. J. A. Sloane, Dec 11 2009

Status

approved