|
|
|
|
0, 1, 129, 3282, 32770, 195315, 839811, 2882404, 8388612, 21523365, 50000005, 107179446, 214990854, 407865367, 737894535, 1281445320, 2147483656, 3487878729, 5509980297, 8491781530, 12800000010, 18911429691, 27437936779, 39155492652, 55037657100, 76293945325
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
G.f.: x*(1 + 120*x + 2157*x^2 + 7792*x^3 + 7827*x^4 + 2136*x^5 + 127*x^6)/(1-x)^9. - Vincenzo Librandi, Dec 10 2014
|
|
MATHEMATICA
|
Table[n (n^7 + 1)/2, {n, 0, 40}] (* or *) CoefficientList[Series[x (1 + 120 x + 2157 x^2 + 7792 x^3 + 7827 x^4 + 2136 x^5 + 127 x^6) / (1 - x)^9, {x, 0, 40}], x] (* Vincenzo Librandi, Dec 10 2014 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|