login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A292221 Expansion of the exponential generating function (1/2)*(1 + 4*x)*(1 - (1 + 4*x)^(-3/2))/x. 3
3, -3, 20, -210, 3024, -55440, 1235520, -32432400, 980179200, -33522128640, 1279935820800, -53970627110400, 2490952020480000, -124903451312640000, 6761440164390912000, -393008709555221760000, 24412776311194951680000, -1613955767240110694400000, 113146793787569865523200000, -8384177419658927035269120000 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,1
COMMENTS
This gives one half of the z-sequence for the generalized unsigned Lah number Sheffer matrix Lah[4,3] = A292219.
For Sheffer a- and z-sequences see a W. Lang link under A006232 with the references for the Riordan case, and also the present link.
a(n) = (-1)^n * A006963(n+2) for all n >= 0. - Michael Somos, Jul 02 2018
LINKS
FORMULA
a(n) = [x^n/n!] (1/2)*(1 + 4*x)*(1 - (1 + 4*x)^(-3/2))/x.
a(0) = 3, a(n) = (-2)^n*Product_{j=1..n} (1 + 2*j)/(n+1) = ((-2)^n/(n+1))*A001147(n+1), n >= 1.
0 = a(n)*(-2880*a(n+2) +2760*a(n+3) +952*a(n+4) +45*a(n+5)) +a(n+1)*(+216*a(n+2) -328*a(n+3) -81*a(n+4) -2*a(n+5)) +a(n+2)*(+12*a(n+3) +2*a(n+4)) for all n>0. - Michael Somos, Jul 02 2018
EXAMPLE
The sequence z(4,3;n) = 2*a(n) begins: {6, -6, 40, -420, 6048, -110880, 2471040, -64864800, 1960358400, -67044257280, 2559871641600, ...}.
MAPLE
seq(coeff(series(factorial(n)*(1/2)*(1+4*x)*(1-(1+4*x)^(-3/2))/x, x, n+1), x, n), n=0..20); # Muniru A Asiru, Jul 29 2018
MATHEMATICA
a[ n_] := If[ n < 1, 3 Boole[n == 0], (-2)^n (2 n + 1)!! / (n + 1)]; (* Michael Somos, Jul 02 2018 *)
With[{nn=20}, CoefficientList[Series[1/2 (1+4x) (1-(1+4x)^(-3/2))/x, {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 24 2018 *)
PROG
(PARI) {a(n) = if( n<1, 3*(n==0), (-1)^n * (2*n + 1)! / (n + 1)!)}; /* Michael Somos, Jul 02 2018 */
(Magma) [3, -3] cat [(-1)^n*Factorial(2*n+1)/Factorial(n+1): n in [2..30]]; // G. C. Greubel, Jul 28 2018
CROSSREFS
Sequence in context: A078431 A346750 A292953 * A112534 A006656 A367995
KEYWORD
sign,easy
AUTHOR
Wolfdieter Lang, Sep 23 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 24 00:30 EDT 2024. Contains 371917 sequences. (Running on oeis4.)