OFFSET
0,2
COMMENTS
Row m=8 of the array A(8; m,n) := ((7*n+m)(!^7))/m(!^7), m >= 0, n >= 0.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..337
FORMULA
a(n) = ((7*n+8)(!^7))/8(!^7) = A045754(n+2)/8.
E.g.f.: 1/(1-7*x)^(15/7).
MATHEMATICA
s=1; lst={s}; Do[s+=n*s; AppendTo[lst, s], {n, 14, 5!, 7}]; lst (* Vladimir Joseph Stephan Orlovsky, Nov 08 2008 *)
With[{nn = 30}, CoefficientList[Series[1/(1 - 7*x)^(15/7), {x, 0, nn}], x]*Range[0, nn]!] (* G. C. Greubel, Aug 16 2018 *)
PROG
(PARI) x='x+O('x^30); Vec(serlaplace(1/(1-7*x)^(15/7))) \\ G. C. Greubel, Aug 16 2018
(Magma) m:=30; R<x>:=PowerSeriesRing(Rationals(), m); b:=Coefficients(R!(1/(1-7*x)^(15/7))); [Factorial(n-1)*b[n]: n in [1..m]]; // G. C. Greubel, Aug 16 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
STATUS
approved