A168119 n*(n^10+1)/2.
0, 1, 1025, 88575, 2097154, 24414065, 181398531, 988663375, 4294967300, 15690529809, 50000000005, 142655835311, 371504185350, 896080197025, 2024782584839, 4324877929695, 8796093022216, 17135948153825
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..10000
- Index entries for linear recurrences with constant coefficients, signature (12,-66,220,-495,792,-924,792,-495,220,-66,12,-1).
Crossrefs
Cf. A170793.
Programs
-
Magma
[n*(n^10+1)/2: n in [0..20]]; // Vincenzo Librandi, Sep 15 2011
-
Mathematica
Table[n (n^10 + 1)/2, {n, 0, 20}] (* Harvey P. Dale, Sep 14 2011 *) CoefficientList[Series[x (1 + 1013 x + 76341 x^2 + 1101684 x^3 + 4869162 x^4 + 7861998 x^5 + 4869162 x^6 + 1101684 x^7 + 76341 x^8 + 1013 x^9 + x^10)/(1 - x)^12, {x, 0, 20}], x] (* Vincenzo Librandi, Dec 10 2014 *)
Formula
G.f.: x*(1 + 1013*x + 76341*x^2 + 1101684*x^3 + 4869162*x^4 + 7861998*x^5 + 4869162*x^6 + 1101684*x^7 + 76341*x^8 + 1013*x^9 + x^10)/(1 - x)^12. - Vincenzo Librandi, Dec 10 2014