Real-rooted atlas

A272866 → D → θ+1

nonnegative coefficients

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

Recurrence

\(\left(-3 + 5\,x + 9\,x^{2} + 4\,x^{3} + 3\,n - 14\,n x - 21\,n x^{2} - 8\,n x^{3} + 9\,n^{2} x + 12\,n^{2} x^{2} + 4\,n^{2} x^{3}\right)\,P_{n}(x) = \left(3\,n + 13\,n x + 18\,n x^{2} + 13\,n x^{3} + 3\,n x^{4} + 9\,n^{2} x + 39\,n^{2} x^{2} + 49\,n^{2} x^{3} + 24\,n^{2} x^{4} + 4\,n^{2} x^{5}\right)\,P_{n-1}(x)\)
\(P_{0}(x) = 0\)
\(P_{1}(x) = 3 + 4\,x\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14x15x16x17x18x19x20x21x22x23x24x25x26x27Pn(1)
00
1347
26445416120
39120405480225361275
41223212963120360020885886411000
5153802970109602182524660161706080121510084375
6185645670283208145014360415964211328051030141002178144600000
7217849639608162299505591889056679941127450383801001295912822435491964046875
824104015120115360541800168940836397205536960601668046928002622312103824028392050960540025626250000
9271332223562001601124550428954411600064228021123305650535628300286450561715817676019582451960558900852487803324165234375
1030166031590324720212490095979603131982075881280138808890193688100207356490170732880108021420522555601912410051955201014390134460108304001015625000
1133202443065499840373477519508148746762942156668804786942058263596001117800783118995782499875704566047982034290135013872460843173999101217601727385202400145534846123046875
123624245702473761661974003676701616165472454295718414209988762936280600483257253663707415846749626104575510997639472191002171828736953432964330903144894904561844040027941762933041904457636328125000
13392860737101051440981337565199420323933610124174336037497645909047610000176139978302785246776035929571535379103033403275330175023161881600133787897106286325760238653129072443800017310793531806060433251041184024375676212646484375
144233329336614560001494675010995894060939879026269443208999991000248758510005605832232010376736552015859483731020083000350021114697275018447531648013389136488080597757240401110710001641840200054845891101478336860316273230524160006483750563108306187841230468750000
Technical details
Node id
n-dc3ccd6c0c74356a · revision 0 · JSON
Definition source
derived:theta_plus_one
Fingerprint
f6-b8517a80dcb1c5d1

Observed on the stored rows ?

  • Degrees: -1, 1, 3, 5, 7, 9, 11, 13, 15, 17, 19, 21, 23, 25, 27 (affine: slope 2, intercept -1)
  • 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:  0;
  1:  3,    4;
  2:  6,   44,    54,     16;
  3:  9,  120,   405,    480,     225,      36;
  4: 12,  232,  1296,   3120,    3600,    2088,      588,       64;
  5: 15,  380,  2970,  10960,   21825,   24660,    16170,     6080,     1215,      100;
  6: 18,  564,  5670,  28320,   81450,  143604,   159642,   113280,    51030,    14100,     2178,      144;
  7: 21,  784,  9639,  60816,  229950,  559188,   905667,   994112,   745038,   380100,   129591,    28224,    3549,     196;
  8: 24, 1040, 15120, 115360,  541800, 1689408,  3639720,  5536960,  6016680,  4692800,  2622312,  1038240,  283920,   50960,   5400,   256;
  9: 27, 1332, 22356, 200160, 1124550, 4289544, 11600064, 22802112, 33056505, 35628300, 28645056, 17158176, 7601958, 2451960, 558900, 85248, 7803, 324;
%F Formula
The row polynomials satisfy (3*n-3+(9*n^2-14*n+5)*x+(12*n^2-21*n+9)*x^2+(4*n^2-8*n+4)*x^3)*P(n,x) = (3*n+(9*n^2+13*n)*x+(39*n^2+18*n)*x^2+(49*n^2+13*n)*x^3+(24*n^2+3*n)*x^4+4*n^2*x^5)*P(n-1,x) for n >= 2, with P(0,x) = 0, P(1,x) = 3 + 4*x.
%t Mathematica
P[0, x_] := 0;
P[1, x_] := 3 + 4*x;
P[n_, x_] := P[n, x] = Expand[Together[((3*n + (9*n^2 + 13*n)*x + (39*n^2 + 18*n)*x^2 + (49*n^2 + 13*n)*x^3 + (24*n^2 + 3*n)*x^4 + 4*n^2*x^5)*P[n - 1, x])/(3*n - 3 + (9*n^2 - 14*n + 5)*x + (12*n^2 - 21*n + 9)*x^2 + (4*n^2 - 8*n + 4)*x^3)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten
%o PARI/GP
P(N) = {my(v = vector(N + 1)); v[1] = 0; v[2] = 3 + 4*x; for(n = 2, N, my(i = n + 1); v[i] = ((3*n + (9*n^2 + 13*n)*x + (39*n^2 + 18*n)*x^2 + (49*n^2 + 13*n)*x^3 + (24*n^2 + 3*n)*x^4 + 4*n^2*x^5)*v[i - 1])/(3*n - 3 + (9*n^2 - 14*n + 5)*x + (12*n^2 - 21*n + 9)*x^2 + (4*n^2 - 8*n + 4)*x^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. [Bra06] Petter Brändén. On linear transformations preserving the Pólya frequency property. Transactions of the American Mathematical Society, 358(8):3697–3716, February 2006. doi:10.1090/s0002-9947-06-03856-6
  2. [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
  3. [SP14] J Schur and G Polya. Über zwei Arten von Faktorenfolgen in der Theorie der algebraischen Gleichungen. J. Reine Angew. Math., 1914.