basis-map coefficients of A297191, shifted → θ+1 → basis A013609

nonnegative coefficientsonly rational roots

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

Recurrence

\(\left(-1 + 2\,n\right)\,P_{n}(x) = \left(1 + 4\,x + 4\,x^{2} + 2\,n + 8\,n x + 8\,n x^{2}\right)\,P_{n-1}(x)\)
\(P_{0}(x) = 1\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14x15x16x17x18x19x20x21x22x23x24x25x26x27x28Pn(1)
011
13121227
254012016080405
37844201120168013444485103
49144100840321008016128161289216230459049
51122019801056036960887041478401689601267205632011264649539
613312343222880102960329472768768131788816473601464320878592319488532486908733
71542054604368024024096096028828806589440115315201537536015375360111820805591040172032024576071744535
81754481607616049504023761928712704248934405601024099573760139403264152076288126730240779878403342336089128961114112731794257
91968411628124032930240520934422573824773959682128389124729753608513556481238335488144472473613335920649525657605080350721905131524482662449807367360989291
10218401596019152016279201041868852093440208373760677214720180590592039729930247223623680108354355201333592064013335920640106687365126667960320313786368010459545602202009602202009673222472421
112310122125228336026919201938182410983033650208153618828057605857617920152298065923322866892860919226368937218867201204995686401285328732161124662640647938795110444104417280185702809605571084288106115891296468992721764371007
12251200276004048004250400340032002153536001107532800470701440016736051200502081536001278025728002769055744005112102912008033304576001071107276800120499568640011341135872008820883456005571084288002785542144001061158912002894069760050331648004194304007060738412025
132714043510056160064584005683392039783744022733568001079844480043193779200146858849280427225743360106806435840023004463104004272257433600683561189376093989663539201105760747520011057607475200931166945280065181686169603724667781120169303080960058888028160014722007040023555211264181193932868630377364883
1429162443848760032950040091203840699229440439515648023074571520102553651200389703874560127539449856036136177459208895059066880190608408576003558023626752057817883934720816252479078409976419188736010501493882880094513444945920720102437683204582470057984023908539432960996189143040031878052577287356473671681089847951367784628224663426981193869
Technical details
Node id
n-e289aa535cbb9f6a · revision 0 · JSON
Definition source
derived:basis_map_A013609
Fingerprint
f6-90334921cba1a1bb

Observed on the stored rows ?

  • Degrees: 0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24, 26, 28 (affine: slope 2, 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 ℚ): yes

Matches ?

No OEIS matches.

Submission text ?

Atlas rows n = 0, …, ascending powers of x
%e Example
Triangle begins:
  0:  1;
  1:  3,  12,    12;
  2:  5,  40,   120,    160,     80;
  3:  7,  84,   420,   1120,   1680,    1344,      448;
  4:  9, 144,  1008,   4032,  10080,   16128,    16128,     9216,      2304;
  5: 11, 220,  1980,  10560,  36960,   88704,   147840,   168960,    126720,     56320,     11264;
  6: 13, 312,  3432,  22880, 102960,  329472,   768768,  1317888,   1647360,   1464320,    878592,     319488,      53248;
  7: 15, 420,  5460,  43680, 240240,  960960,  2882880,  6589440,  11531520,  15375360,  15375360,   11182080,    5591040,    1720320,    245760;
  8: 17, 544,  8160,  76160, 495040, 2376192,  8712704, 24893440,  56010240,  99573760, 139403264,  152076288,  126730240,   77987840,  33423360,   8912896,   1114112;
  9: 19, 684, 11628, 124032, 930240, 5209344, 22573824, 77395968, 212838912, 472975360, 851355648, 1238335488, 1444724736, 1333592064, 952565760, 508035072, 190513152, 44826624, 4980736;
%F Formula
The row polynomials satisfy (2*n-1)*P(n,x) = (2*n+1+(8*n+4)*x+(8*n+4)*x^2)*P(n-1,x) for n >= 1, with P(0,x) = 1.
%t Mathematica
P[0, x_] := 1;
P[n_, x_] := P[n, x] = Expand[Together[((2*n + 1 + (8*n + 4)*x + (8*n + 4)*x^2)*P[n - 1, x])/(2*n - 1)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten
%o PARI/GP
P(N) = {my(v = vector(N + 1)); v[1] = 1; for(n = 1, N, my(i = n + 1); v[i] = ((2*n + 1 + (8*n + 4)*x + (8*n + 4)*x^2)*v[i - 1])/(2*n - 1)); 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

Same fingerprint ?

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.