A132166 → x ↦ x+1

nonnegative coefficients

Proved for all n all roots real, in [−37, −1)coefficients of one signHadamard kernelinterlacing (weak)

Recurrence

\(\left(3 + n\right)\,P_{n}(x) = \left(50 + 2\,x + 6\,n\right)\,P_{n-1}(x) + \left(37 + 38\,x + x^{2}\right)\,P_{n-1}'(x)\)
\(P_{0}(x) = 379 + 44\,x + x^{2}\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14x15x16Pn(1)
0379441424
1571312426617022
280032281022589881110812
3108032555507777815442011011717748
4143545571001251219754431655006735132126514880
518985343816954603944572143512569430180595341541409408808
625111776792744639366922030813138677168110246504973781281717616328060048
733258000301430055753101785282603333887268063475415372092538776286716584198197874375024
84409536650886578530335643283233755587647795768097909286257528288323631523711089202083522011514189234560
9584997861758598827473239635796735000301161954547608125234507086024011602581146780589958915788154618525570242123426891385056
107762763837853714640807316953699046961528682325624767023566050329417170695646469926522660616172642496480906828842085310307892641362446127023552
11103013605422736621451124069991491647905410498362627214731528412136642518874975186266329985251680961219575103886020140446883484513380662527369433649228615607427207781696
121366971717831381131148217173679824268227629132884571165582607174633229348033956074894669691999690204970862247047936718827123361922170287577185819424190711367351173242679308186751876034902016
131813879896406450814489267462981765144286928112372329722101469914728546596040083644519358011071271259514977136975447636054311883043805851874048486688903356292889151108466643926405572244203254935033011342122983099186816
14240684001322817481664294967278895817946746975685423548283369238523082973748011984446684529357602502107294415326223553688839507515135695321317813522602683654534811399466792911055864184744516513963536356732558547337056505352120763734314343823616
Technical details
Node id
n-6cf51bee0786f309 · revision 0 · JSON
Definition source
derived:shift_x_plus_one
Fingerprint
f6-67df8a2168740ae3

Observed on the stored rows ?

  • Degrees: 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 (affine: slope 1, intercept 2)
  • 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:           379,            44,             1;
  1:          5713,          1242,            66,             1;
  2:         80032,         28102,          2589,            88,            1;
  3:       1080325,        555077,         77815,          4420,          110,           1;
  4:      14354557,      10012512,       1975443,        165500,         6735,         132,          1;
  5:     189853438,     169546039,      44572143,       5125694,       301805,        9534,        154,        1;
  6:    2511177679,    2744639366,     922030813,     138677168,     11024650,      497378,      12817,      176,       1;
  7:   33258000301,   43005575310,   17852826033,    3388726806,    347541537,    20925387,     762867,    16584,     198,     1;
  8:  440953665088,  657853033564,  328323375558,   76477957680,   9790928625,   752828832,   36315237,  1108920,   20835,   220,   1;
  9: 5849978617585, 9882747323963, 5796735000301, 1619545476081, 252345070860, 24011602581, 1467805899, 58915788, 1546185, 25570, 242, 1;
%F Formula
The row polynomials satisfy (n+3)*P(n,x) = (6*n+50+2*x)*P(n-1,x) + (37+38*x+x^2)*d/dx P(n-1,x) for n >= 1, with P(0,x) = 379 + 44*x + x^2.
%t Mathematica
P[0, x_] := 379 + 44*x + x^2;
P[n_, x_] := P[n, x] = Expand[Together[((6*n + 50 + 2*x)*P[n - 1, x] + (37 + 38*x + x^2)*D[P[n - 1, x], x])/(n + 3)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten
%o PARI/GP
P(N) = {my(v = vector(N + 1)); v[1] = 379 + 44*x + x^2; for(n = 1, N, my(i = n + 1); v[i] = ((6*n + 50 + 2*x)*v[i - 1] + (37 + 38*x + x^2)*deriv(v[i - 1], x))/(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. [MW08] Shi-Mei Ma and Yi Wang. q-Eulerian polynomials and polynomials with only real zeros. The Electronic Journal of Combinatorics, 15(1):Research Paper 17, January 2008. doi:10.37236/741