A123333 a(n) = 3^n*(Gamma(n+1/3)/Gamma(1/3) + (n-1)!).
4, 13, 82, 766, 9472, 145720, 2681200, 57411760, 1402226560, 38468725120, 1171102777600, 39174663404800, 1428249121868800, 56366281606835200, 2393966461645158400, 108871544042829568000
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..380
Crossrefs
Cf. A121630.
Programs
-
Mathematica
With[{nmax = 50}, CoefficientList[Series[(1 - 3*x)^(-1/3) - 1 - Log[1 - 3*x], {x, 0, nmax}], x] Range[0, nmax]!] (* G. C. Greubel, Oct 12 2017 *)
-
PARI
x='x+O('x^30); Vec(serlaplace((1-3*x)^(-1/3) - 1 - log(1-3*x))) \\ G. C. Greubel, Oct 12 2017
Formula
E.g.f.: (1-3*x)^(-1/3) - 1 - log(1-3*x).
Comments