A038271 → basis A013610 → θ+1

nonnegative coefficientsonly rational roots

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

Recurrence

\(\left(4 + 5\,n x\right)\,P_{n}(x) = \left(48 + 120\,x + 75\,x^{2} + 60\,n x + 75\,n x^{2}\right)\,P_{n-1}(x)\)
\(P_{0}(x) = 1\)

Rows ?

nx0x1x2x3x4x5x6x7x8x9x10x11x12x13x14Pn(1)
011
1123042
21447206751539
3172812960243001350052488
4207362073605832006480002531251712421
52488323110400116640001944000015187500455625054206982
6298598444789760209952000466560000546750000328050000797343751678822119
7358318086270566403527193600979776000015309000000137781000006697687500136687500051139504548
8429981696859963392056435097600188116992000367416000000440899200000321489000000131220000000230660156251537671920841
951597803521160950579208707129344003386105856000793618560000011904278400000115736040000007085880000000249112968750038443359375045753584909922
1061917364224154793410560013060694016000580475289600001587237120000002857026816000003472081200000002834352000000001494677812500004613203125000063431542968751349730754842699
117430083706882043273019392019155684556800095778422784000029930757120000006285458995200000916629436800000093533616000000006576582375000000304471406250000083729636718750010379707031250039531097362172608
12891610044825626748301344768027584185761792001532454764544000053875362816000000129300870758400000219991064832000000269376814080000000236756965500000000146146275000000000602853384375000001494677812500000016867023925781251150725537276993261
1310699320537907234772791748198403911939071672320023906294326886400093383962214400000025213669797888000004902658016256000000700379716608000000073868173236000000005699704725000000000313483759875000000011658486937500000002631255732421875002724673095703125033321009035933804862
141283918464548864449371462592102405476714700341248003651143133560832000156885056520192000004706551695605760000010295581834137600000016809113198592000000020683088506080000000019151007876000000000013166317914750000000065287526850000000000221025481523437500004577450800781250000437893890380859375960455571265497375279
Technical details
Node id
n-84fd6a0d7d3c5087 · revision 0 · JSON
Definition source
derived:theta_plus_one
Fingerprint
f6-eefdbaf8408bdfd8

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 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:         12,           30;
  2:        144,          720,          675;
  3:       1728,        12960,        24300,         13500;
  4:      20736,       207360,       583200,        648000,        253125;
  5:     248832,      3110400,     11664000,      19440000,      15187500,        4556250;
  6:    2985984,     44789760,    209952000,     466560000,     546750000,      328050000,       79734375;
  7:   35831808,    627056640,   3527193600,    9797760000,   15309000000,    13778100000,     6697687500,    1366875000;
  8:  429981696,   8599633920,  56435097600,  188116992000,  367416000000,   440899200000,   321489000000,  131220000000,   23066015625;
  9: 5159780352, 116095057920, 870712934400, 3386105856000, 7936185600000, 11904278400000, 11573604000000, 7085880000000, 2491129687500, 384433593750;
%F Formula
The row polynomials satisfy (4+5*n*x)*P(n,x) = (48+(60*n+120)*x+(75*n+75)*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[((48 + (60*n + 120)*x + (75*n + 75)*x^2)*P[n - 1, x])/(4 + 5*n*x)]];
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] = ((48 + (60*n + 120)*x + (75*n + 75)*x^2)*v[i - 1])/(4 + 5*n*x)); 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. [LW07] Lily L. Liu and Yi Wang. A unified approach to polynomial sequences with only real zeros. Advances in Applied Mathematics, 38(4):542–560, May 2007. doi:10.1016/j.aam.2006.02.003
  4. [SP14] J Schur and G Polya. Über zwei Arten von Faktorenfolgen in der Theorie der algebraischen Gleichungen. J. Reine Angew. Math., 1914.