|
|
A123333
|
|
a(n) = 3^n*(Gamma(n+1/3)/Gamma(1/3) + (n-1)!).
|
|
1
|
|
|
4, 13, 82, 766, 9472, 145720, 2681200, 57411760, 1402226560, 38468725120, 1171102777600, 39174663404800, 1428249121868800, 56366281606835200, 2393966461645158400, 108871544042829568000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The EXP-transform of a(n) is equal to A121630(n).
|
|
LINKS
|
|
|
FORMULA
|
E.g.f.: (1-3*x)^(-1/3) - 1 - log(1-3*x).
|
|
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 *)
|
|
PROG
|
(PARI) x='x+O('x^30); Vec(serlaplace((1-3*x)^(-1/3) - 1 - log(1-3*x))) \\ G. C. Greubel, Oct 12 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|