|
| |
|
|
A168191
|
|
a(n) = n^3*(n^10 + 1)/2.
|
|
1
|
|
|
|
0, 1, 4100, 797175, 33554464, 610351625, 6530347116, 48444505375, 274877907200, 1270932914529, 5000000000500, 17261356072631, 53496602690400, 151437553297225, 396857386628444, 973097534181375, 2251799813687296, 4952289016455425, 10411482432838500
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
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
|
| |
|
|
