A156289 → x ↦ x+1

nonnegative coefficients

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

Recurrence

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

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14Pn(1)
111
2437
331451591
43797985251051807
565561789517325693094549651
6150349500643634425377685103950103951777447
743734611710618026636610209309108648640175675513513579587691
8156297964699786363128718135012509897406871614752109457353310807520270254327497727
966984863713369302122571265219495822449709905619872758523069436390549972423068918850034459425279393234211
10337789490599188190159145844887684437755982583378695487745384490025032038481458018248738501532066035501571349780065472907521043100301847
1119738202807236120452544462855319244074196355481553509984470455214215928780279939935330055112591882137735290175926040004551021800325389563799625137493105751822706292362011
121319703681935929874293069616890325451659566967425427910915363604754593725935131217532875820841453975159041529424527755165353436668425109608259918657514378112378630010435726726425316234143225179438587737162607
139989678734252308171320113185937252022593544285176719404183441282882761900502041217825307160040933018916710420502312158979083303350906227666609265000243070437729994875432461484936731254817827172032875300422436063750790585358062519879437087904356691
148484301665702298804648765125090246455232219509550065217319004482663344455453138805939784997201968412505428852156844617000503503900438414368492501608344422406334112505220916761982408987511770699675025040750178195251717070087517075220680505487592498486893312502134580466768752457608340439083686407
1580222167922097588663165360059193609541270452399433468934764343537552442671354235451869580759686913324316848206707685414174214132526170055750163149192727615400293184065252967914025001117548692711545819725030567332613029556093755876027428899026148757662882982531651875063842455653764287503033238843278393756190283353629375336569781912094245256651
Technical details
Node id
n-992ded70fabcb6bc · revision 0 · JSON
Definition source
derived:shift_x_plus_one
Fingerprint
f6-27428437fc285c33

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:            4,             3;
   3:           31,            45,            15;
   4:          379,           798,           525,           105;
   5:         6556,         17895,         17325,          6930,           945;
   6:       150349,        500643,        634425,        377685,        103950,         10395;
   7:      4373461,      17106180,      26636610,      20930910,       8648640,       1756755,       135135;
   8:    156297964,     699786363,    1287181350,    1250989740,     687161475,     210945735,     33108075,      2027025;
   9:   6698486371,   33693021225,   71265219495,   82244970990,   56198727585,   23069436390,   5499724230,    689188500,    34459425;
  10: 337789490599, 1881901591458, 4488768443775, 5982583378695, 4877453844900, 2503203848145, 801824873850, 153206603550, 15713497800, 654729075;
%F Formula
The row polynomials satisfy P(n,x) = (4+3*x)*P(n-1,x) + (5+7*x+2*x^2)*d/dx P(n-1,x) + (1+2*x+x^2)*d^2/dx^2 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[(4 + 3*x)*P[n - 1, x] + (5 + 7*x + 2*x^2)*D[P[n - 1, x], x] + (1 + 2*x + x^2)*D[P[n - 1, x], {x, 2}]];
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] = (4 + 3*x)*v[i - 1] + (5 + 7*x + 2*x^2)*deriv(v[i - 1], x) + (1 + 2*x + x^2)*deriv(deriv(v[i - 1], x), 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. [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.