A089503 → x ↦ x+1

nonnegative coefficients

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

Recurrence

\(P_{n}(x) = \left(-1 + 2\,x^{2} + n - 2\,n x - 3\,n x^{2} + n^{2} + 2\,n^{2} x + n^{2} x^{2}\right)\,P_{n-1}(x) + \left(x + 2\,x^{2} + x^{3} - n - 3\,n x - 3\,n x^{2} - n x^{3}\right)\,P_{n-1}'(x)\)
\(P_{1}(x) = 1\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14Pn(1)
111
2549
3437230145
4529136811763363409
585012992039420230405040105921
616902175510013477201201200534600950404102681
7401045521758184491427305914272039999960144144002162160190630609
811067683370728011219358186402941528800267998640014639788804439635205765760010340890785
93484717129256513754888256824805615179370393617431938720012805115904058757287680153977241601764322560641787925249
101233204121811027994161140380707824024082211854132801140808731048010549156020480650047991040025739368704005942559168006094932480044866443580201
114847038223171451461913474001891648570095904695435426528007646067051084008534903079225606613770933000003513119081472001224202351680002527052774400023465490048003489524955627921
122095366284227052157204484374984100922435247651602832184020470904052972243427869920693355541620896006480619106601024043254178224364800202029553246752006289060767897600117430595251200099638080819200298914951848510449
139882471447634813111457337689612512576023870271606900180382513248537600038120362206935580005727441691215129600627326262800677440050470045927741440002960059295072880000123424928250624000034730098545542400059213488029696000462605375232000027966383049400396225
14505033804901100749619338397118898074835048218917373769016121184111481654036816285637147007891679000484658635534566292800609035036983294521600573888760488871027200405500405068097539200212195884348768320000799337052407013120002052604540777190400032204273196775680002331531091169280002837759948683874979129
152780231980352836779136837750491910048996022658179494792535430108575064733626068816320223077447508415889589204219914881204895416544059861105031666620682000646870700892613317120005351020596275977022400033719877037378756224000159340202926128544320005475074428677934080000129316686183292608000018792826339262976000012677700308232960000310425081738609550495441
Technical details
Node id
n-f573c9322e5df2c8 · revision 0 · JSON
Definition source
derived:shift_x_plus_one
Fingerprint
f6-11ac09149027f91e

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 -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 = 1, …, ascending powers of x
%e Example
Triangle begins:
   1:            1;
   2:            5,             4;
   3:           43,            72,            30;
   4:          529,          1368,          1176,           336;
   5:         8501,         29920,         39420,         23040,           5040;
   6:       169021,        755100,       1347720,       1201200,         534600,          95040;
   7:      4010455,      21758184,      49142730,      59142720,       39999960,       14414400,       2162160;
   8:    110676833,     707280112,    1935818640,    2941528800,     2679986400,     1463978880,     443963520,      57657600;
   9:   3484717129,   25651375488,   82568248056,  151793703936,   174319387200,   128051159040,   58757287680,   15397724160,   1764322560;
  10: 123320412181, 1027994161140, 3807078240240, 8221185413280, 11408087310480, 10549156020480, 6500479910400, 2573936870400, 594255916800, 60949324800;
%F Formula
The row polynomials satisfy P(n,x) = (n^2+n-1+(2*n^2-2*n)*x+(n^2-3*n+2)*x^2)*P(n-1,x) - (n+(3*n-1)*x+(3*n-2)*x^2+(n-1)*x^3)*d/dx P(n-1,x) for n >= 2, with P(1,x) = 1.
%t Mathematica
P[1, x_] := 1;
P[n_, x_] := P[n, x] = Expand[(n^2 + n - 1 + (2*n^2 - 2*n)*x + (n^2 - 3*n + 2)*x^2)*P[n - 1, x] - (n + (3*n - 1)*x + (3*n - 2)*x^2 + (n - 1)*x^3)*D[P[n - 1, x], x]];
Table[CoefficientList[P[n, x], x], {n, 1, 10}] // Flatten
%o PARI/GP
P(N) = {my(v = vector(N)); v[1] = 1; for(n = 2, N, my(i = n); v[i] = (n^2 + n - 1 + (2*n^2 - 2*n)*x + (n^2 - 3*n + 2)*x^2)*v[i - 1] - (n + (3*n - 1)*x + (3*n - 2)*x^2 + (n - 1)*x^3)*deriv(v[i - 1], x)); v};
row(n, p) = {my(c = Vecrev(p)); c};
T(N) = {my(v = P(N)); concat(vector(#v, i, row(i, v[i])))};
T(10)

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. [SP14] J Schur and G Polya. Über zwei Arten von Faktorenfolgen in der Theorie der algebraischen Gleichungen. J. Reine Angew. Math., 1914.