The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A073768 Triangle of coefficients of Bateman polynomial n!Z_n(-x). 1
 1, 1, 2, 2, 12, 6, 6, 72, 90, 20, 24, 480, 1080, 560, 70, 120, 3600, 12600, 11200, 3150, 252, 720, 30240, 151200, 201600, 94500, 16632, 924, 5040, 282240, 1905120, 3528000, 2425500, 698544, 84084, 3432, 40320, 2903040, 25401600, 62092800, 58212000, 24216192, 4708704, 411840, 12870 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS EXAMPLE {1}; {1, 2}; {2, 12, 6}; {6, 72, 90, 20}; {24, 480, 1080, 560, 70}; ... 2!Z_2(-x) = 2+12x+6x^2. MAPLE A073768_row := proc(n) n!*hypergeom([-n, n+1], [1, 1], -x); PolynomialTools:-CoefficientList(simplify(%), x) end: seq(A073768_row(n), n=0..8): ListTools[FlattenOnce]([%]); # Peter Luschny, Jan 31 2016 MATHEMATICA T[n_, k_] := n! (n+k)! / (n-k)! / k!^3; Table[T[n, k], {n, 0, 8}, {k, 0, n}] // Flatten (* Jean-François Alcover, Jun 04 2019 *) PROG (PARI) {T(n, k) = if( k<0 || k>n, 0, n! * (n+k)! / (n-k)! / k!^3)} CROSSREFS A073767 gives row sums. Sequence in context: A279179 A279470 A013605 * A278534 A096855 A256120 Adjacent sequences:  A073765 A073766 A073767 * A073769 A073770 A073771 KEYWORD nonn,tabl AUTHOR Michael Somos, Aug 08 2002 STATUS approved

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

Last modified April 14 09:03 EDT 2021. Contains 342946 sequences. (Running on oeis4.)