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