The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
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!)
A176231 Coefficient array of orthogonal polynomials whose moment sequence is the double factorial numbers A001147. 1
1, -1, 1, 3, -6, 1, -15, 45, -15, 1, 105, -420, 210, -28, 1, -945, 4725, -3150, 630, -45, 1, 10395, -62370, 51975, -13860, 1485, -66, 1, -135135, 945945, -945945, 315315, -45045, 3003, -91, 1, 2027025, -16216200, 18918900, -7567560, 1351350, -120120, 5460, -120, 1 (list; table; graph; refs; listen; history; text; internal format)
OFFSET
0,4
COMMENTS
Exponential Riordan array [1/sqrt(1+2x),x/(1+2x)]. Inverse of A176230.
Diagonal sums are an alternating sign version of A025164.
LINKS
FORMULA
Number triangle T(n,k) = (-1)^(n-k)*(2n)!/((2k)!(n-k)!2^(n-k)).
He_(2*n)(x) = Sum_{k=0..n} T(n, k)*x^(2*k) where He is Hermite's polynomial. - Michael Somos, Jan 15 2020
EXAMPLE
Triangle begins
1,
-1, 1,
3, -6, 1,
-15, 45, -15, 1,
105, -420, 210, -28, 1,
-945, 4725, -3150, 630, -45, 1,
10395, -62370, 51975, -13860, 1485, -66, 1,
-135135, 945945, -945945, 315315, -45045, 3003, -91, 1,
2027025, -16216200, 18918900, -7567560, 1351350, -120120, 5460, -120, 1
Production matrix is
-1, 1,
2, -5, 1,
0, 12, -9, 1,
0, 0, 30, -13, 1,
0, 0, 0, 56, -17, 1,
0, 0, 0, 0, 90, -21, 1,
0, 0, 0, 0, 0, 132, -25, 1,
0, 0, 0, 0, 0, 0, 182, -29, 1,
0, 0, 0, 0, 0, 0, 0, 240, -33, 1
MAPLE
T := (n, k) -> (2*n)!*(-1/2)^(n-k)/(2*k)!*(n-k)!:
seq(seq(T(n, k), k=0..n), n=0..8); # Peter Luschny, Jul 20 2019
MATHEMATICA
(* The function RiordanArray is defined in A256893. *)
rows = 9;
R = RiordanArray[1/Sqrt[1 + 2 #]&, #/(1 + 2 #)&, rows, True];
R // Flatten (* Jean-François Alcover, Jul 20 2019 *)
T[ n_, k_] := Coefficient[ HermiteH[2 n, x/Sqrt[2]], x, 2 k]/2^n; (* Michael Somos, Jan 15 2020 *)
T[ n_, k_] := Coefficient[ Nest[# x - D[#, x]&, 1, 2 n], x, 2 k]; (* Michael Somos, Jan 15 2020 *)
PROG
(PARI) {T(n, k) = my(t=1); for(i=1, 2*n, t = x*t - t'); polcoeff(t, 2*k)}; /* Michael Somos, Jan 15 2020 */
CROSSREFS
Sequence in context: A321480 A334879 A108441 * A176230 A335227 A094445
KEYWORD
easy,sign,tabl
AUTHOR
Paul Barry, Apr 12 2010
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 May 18 21:39 EDT 2024. Contains 372666 sequences. (Running on oeis4.)