|
| |
|
|
A001594
|
|
a(n) = 6^n + n^6.
|
|
8
|
|
|
|
1, 7, 100, 945, 5392, 23401, 93312, 397585, 1941760, 10609137, 61466176, 364568617, 2179768320, 13065520825, 78371693632, 470196375201, 2821126684672, 16926683582305, 101559990680640, 609359787056377
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
|
|
|
FORMULA
|
G.f.: (1 - 6*x + 72*x^2 - 75*x^3 - 1475*x^4 - 1776*x^5 - 334*x^6 - 7*x^7)/((1-x)^7*(1-6*x)). - Vincenzo Librandi, Aug 28 2014
|
|
|
MAPLE
|
|
|
|
MATHEMATICA
|
Table[6^n + n^6, {n, 0, 30}] (* or *) CoefficientList[Series[(1 - 6 x + 72 x^2 - 75 x^3 - 1475 x^4 - 1776 x^5 - 334 x^6 - 7 x^7)/((1-x)^7 (1-6 x)), {x, 0, 30}], x] (* Vincenzo Librandi, Aug 28 2014 *)
LinearRecurrence[{13, -63, 161, -245, 231, -133, 43, -6}, {1, 7, 100, 945, 5392, 23401, 93312, 397585}, 20] (* Harvey P. Dale, Jan 07 2023 *)
|
|
|
PROG
|
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn,easy
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
