OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
Index entries for linear recurrences with constant coefficients, signature (7,-21,35,-35,21,-7,1).
FORMULA
a(0)=262144, a(1)=47045881, a(2)=729000000, a(3)=4750104241, a(4)=19770609664, a(5)=62523502209, a(6)=164206490176, a(n) = 7*a(n-1) - 21*a(n-2) + 35*a(n-3) - 35*a(n-4) + 21*a(n-5) - 7*a(n-6) + a(n-7). - Harvey P. Dale, Nov 08 2013
From G. C. Greubel, Sep 22 2019: (Start)
G.f.: (262144 +45210873*x +405183857*x^2 +625892702*x^3 +191449182*x^4 +7524433*x^5 +729*x^6)/(1-x)^7.
E.g.f.: (262144 +46783737*x +317585191*x^2 +450663290*x^3 +206511305*x^4 + 34303863*x^5 +1771561*x^6)*exp(x). (End)
MAPLE
MATHEMATICA
(11*Range[0, 20]+8)^6 (* or *) LinearRecurrence[{7, -21, 35, -35, 21, -7, 1}, {262144, 47045881, 729000000, 4750104241, 19770609664, 62523502209, 164206490176}, 20] (* Harvey P. Dale, Nov 08 2013 *)
PROG
(Magma) [(11*n+8)^6: n in [0..20]]; // Vincenzo Librandi, Sep 04 2011
(Maxima) makelist( (11*n+8)^6, n, 0, 20); /* Martin Ettl, Oct 21 2012 */
(PARI) vector(20, n, (11*n-3)^6) \\ G. C. Greubel, Sep 22 2019
(Sage) [(11*n+8)^6 for n in (0..20)] # G. C. Greubel, Sep 22 2019
(GAP) List([0..20], n-> (11*n+8)^6); # G. C. Greubel, Sep 22 2019
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Dec 11 1996
STATUS
approved