A257615 → θ+1

nonnegative coefficients

Proved for all n all roots real, in (−∞, 0]coefficients of one signHadamard kernelinterlacing (weak)

Recurrence

\(\left(3 + 2\,n\right)\,P_{n}(x) = \left(-75 - 30\,x - 15\,x^{2} - 30\,n - 72\,n x - 46\,n x^{2} - 24\,n^{2} x - 36\,n^{2} x^{2} - 8\,n^{3} x^{2}\right)\,P_{n-2}(x) + \left(-30\,x + 30\,x^{3} - 12\,n x - 20\,n x^{2} + 32\,n x^{3} - 8\,n^{2} x^{2} + 8\,n^{2} x^{3}\right)\,P_{n-2}'(x) + \left(30 + 18\,x + 16\,n + 24\,n x + 8\,n^{2} x\right)\,P_{n-1}(x) + \left(6\,x - 6\,x^{2} + 4\,n x - 4\,n x^{2}\right)\,P_{n-1}'(x)\)
\(P_{0}(x) = 1\)
\(P_{1}(x) = 5 + 10\,x\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14Pn(1)
011
151015
22514075240
3125143021455004200
4625127603861025520312580640
53125105570558030744040263925187501693440
61562583274070808851636888011801475249822010937538707200
77812563604308246461530279302037849127516492923022261505625000958003200
8390625474917609043725004980015520984077315074700232802110202500189967040351562525546752000
9195312534884857094928676607527928072022130534195026556641034013173874126025314313760156981856519531250730637107200
109765625253178374096424538895106855806864044766541606507966992310200626731582491021371161372802892736166851265891870010742187522317642547200
1148828125182107674309551673890851445402584410083574758218650210828629530260245966734451970133719613149840325215581492253183891296950100159220865585937500725323382784000
1224414062513011209076092794102803901882860842170401465890035250075506793393033912083628689713669806757245240452160263860206345013547071521054260034024504361430780672544560317382812524995759652864000
13122070312592494479157088784232199290238046060240044024469795379490875112959437843388690254507974635755820290866256726578080169439156765083035489395907589817506546266656601210355136928797160601214114520517089843750910559815925760000
146103515625655029713474083929318822690529381298985579280392496733758395125236975792012477850070941417959708718451105291775560996704091210394519625495153949596533541297500863492814268469275881438969567378403636937148983255458520799431809155273437534965496931549184000
Technical details
Node id
n-baf012a19aece82b · revision 0 · JSON
Definition source
derived:theta_plus_one
Fingerprint
f6-27bcff2c51d51bee

Observed on the stored rows ?

  • Degrees: 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14 (affine: slope 1, intercept 0)
  • Palindromic rows: no
  • γ-positive (gamma_positive): no
  • Nonnegative coefficients (nonn): yes
  • Only rational roots (rr_by_factors: every nonzero row is a product of linear factors over ℚ): no

Matches ?

No OEIS matches.

Submission text ?

Atlas rows n = 0, …, ascending powers of x
%e Example
Triangle begins:
  0:       1;
  1:       5,        10;
  2:      25,       140,         75;
  3:     125,      1430,       2145,         500;
  4:     625,     12760,      38610,       25520,         3125;
  5:    3125,    105570,     558030,      744040,       263925,        18750;
  6:   15625,    832740,    7080885,    16368880,     11801475,      2498220,       109375;
  7:   78125,   6360430,   82464615,   302793020,    378491275,    164929230,     22261505,      625000;
  8:  390625,  47491760,  904372500,  4980015520,   9840773150,   7470023280,   2110202500,   189967040,    3515625;
  9: 1953125, 348848570, 9492867660, 75279280720, 221305341950, 265566410340, 131738741260, 25314313760, 1569818565, 19531250;
%F Formula
The row polynomials satisfy (2*n+3)*P(n,x) = -(30*n+75+(24*n^2+72*n+30)*x+(8*n^3+36*n^2+46*n+15)*x^2)*P(n-2,x) - ((12*n+30)*x+(8*n^2+20*n)*x^2-(8*n^2+32*n+30)*x^3)*d/dx P(n-2,x) + (16*n+30+(8*n^2+24*n+18)*x)*P(n-1,x) + ((4*n+6)*x-(4*n+6)*x^2)*d/dx P(n-1,x) for n >= 2, with P(0,x) = 1, P(1,x) = 5 + 10*x.
%t Mathematica
P[0, x_] := 1;
P[1, x_] := 5 + 10*x;
P[n_, x_] := P[n, x] = Expand[Together[(-(30*n + 75 + (24*n^2 + 72*n + 30)*x + (8*n^3 + 36*n^2 + 46*n + 15)*x^2)*P[n - 2, x] - ((12*n + 30)*x + (8*n^2 + 20*n)*x^2 - (8*n^2 + 32*n + 30)*x^3)*D[P[n - 2, x], x] + (16*n + 30 + (8*n^2 + 24*n + 18)*x)*P[n - 1, x] + ((4*n + 6)*x - (4*n + 6)*x^2)*D[P[n - 1, x], x])/(2*n + 3)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten
%o PARI/GP
P(N) = {my(v = vector(N + 1)); v[1] = 1; v[2] = 5 + 10*x; for(n = 2, N, my(i = n + 1); v[i] = (-(30*n + 75 + (24*n^2 + 72*n + 30)*x + (8*n^3 + 36*n^2 + 46*n + 15)*x^2)*v[i - 2] - ((12*n + 30)*x + (8*n^2 + 20*n)*x^2 - (8*n^2 + 32*n + 30)*x^3)*deriv(v[i - 2], x) + (16*n + 30 + (8*n^2 + 24*n + 18)*x)*v[i - 1] + ((4*n + 6)*x - (4*n + 6)*x^2)*deriv(v[i - 1], x))/(2*n + 3)); v};
row(n, p) = {my(c = Vecrev(p)); c};
T(N) = {my(v = P(N)); concat(vector(#v, i, row(i - 1, v[i])))};
T(9)

polytool c48629374597

Properties

Proof chains ? JSON

References

  1. [Bra15] Petter Brändén. Unimodality, log-concavity, real-rootedness and beyond. Handbook of enumerative combinatorics, :437–483, March 2015. doi:10.1201/b18255-10
  2. [LW07] Lily L. Liu and Yi Wang. A unified approach to polynomial sequences with only real zeros. Advances in Applied Mathematics, 38(4):542–560, May 2007. doi:10.1016/j.aam.2006.02.003
  3. [SP14] J Schur and G Polya. Über zwei Arten von Faktorenfolgen in der Theorie der algebraischen Gleichungen. J. Reine Angew. Math., 1914.