A085478 → basis A013611 → D+1
nonnegative coefficients
Proved for all n all roots real, in (−∞, 0]coefficients of one signHadamard kernelinterlacing (weak)
Recurrence
\(\left(-516 - 96\,x + 192\,x^{2} + 920\,n + 64\,n x - 128\,n x^{2} - 576\,n^{2} + 128\,n^{3}\right)\,P_{n}(x) = \left(-96 + 80\,x + 384\,x^{2} + 256\,x^{3} + 308\,n + 144\,n x - 320\,n x^{2} - 256\,n x^{3} - 448\,n^{2} - 512\,n^{2} x + 192\,n^{3} + 256\,n^{3} x\right)\,P_{n-1}(x) + \left(15 - 48\,x - 608\,x^{2} - 768\,x^{3} - 256\,x^{4} - 160\,n - 768\,n x - 512\,n x^{2} + 80\,n^{2} + 384\,n^{2} x + 256\,n^{2} x^{2}\right)\,P_{n-1}'(x)\)
\(P_{0}(x) = 1\)
Rows ?
| n | x0 | x1 | x2 | x3 | x4 | x5 | x6 | x7 | x8 | x9 | x10 | x11 | x12 | x13 | Pn(1) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 0 | 1 | 1 | |||||||||||||
| 1 | 1 | 1 | |||||||||||||
| 2 | 6 | 4 | 10 | ||||||||||||
| 3 | 25 | 52 | 16 | 93 | |||||||||||
| 4 | 89 | 332 | 320 | 64 | 805 | ||||||||||
| 5 | 294 | 1604 | 2784 | 1728 | 256 | 6666 | |||||||||
| 6 | 929 | 6696 | 17136 | 19072 | 8704 | 1024 | 53561 | ||||||||
| 7 | 2849 | 25560 | 87120 | 142976 | 116480 | 41984 | 4096 | 421065 | |||||||
| 8 | 8550 | 91844 | 392352 | 859200 | 1030400 | 660480 | 196608 | 16384 | 3255818 | ||||||
| 9 | 25241 | 315932 | 1625120 | 4471232 | 7153920 | 6736896 | 3555328 | 901120 | 65536 | 24850325 | |||||
| 10 | 73561 | 1051492 | 6331312 | 21026944 | 42294528 | 53093376 | 41086976 | 18415616 | 4063232 | 262144 | 187699181 | ||||
| 11 | 212166 | 3410308 | 23539008 | 91721856 | 222917632 | 351740928 | 362471424 | 237830144 | 92602368 | 18087936 | 1048576 | 1405582346 | |||
| 12 | 606721 | 10832976 | 84345120 | 377540608 | 1077756160 | 2055251968 | 2660876288 | 2322432000 | 1321795584 | 454819840 | 79691776 | 4194304 | 10450143345 | ||
| 13 | 1722625 | 33827760 | 293338080 | 1483904000 | 4871648000 | 10917017600 | 17079336960 | 18716590080 | 14155776000 | 7110656000 | 2191523840 | 348127232 | 16777216 | 77220245393 | |
| 14 | 4861254 | 104131204 | 995340480 | 5617187712 | 20864291840 | 53801413632 | 98920046592 | 130950758400 | 124269428736 | 82874204160 | 37244370944 | 10393485312 | 1509949440 | 67108864 | 567616578570 |
Compute more
?
Technical details
- Node id
n-c60b7a28f15389b9· revision 0 · JSON- Definition source
derived:one_plus_derivative- Fingerprint
f6-2a10791ffa3613cc
Observed on the stored rows ?
- Degrees: 0, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13 (irregular)
- 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 ExampleTriangle begins: 0: 1; 1: 1; 2: 6, 4; 3: 25, 52, 16; 4: 89, 332, 320, 64; 5: 294, 1604, 2784, 1728, 256; 6: 929, 6696, 17136, 19072, 8704, 1024; 7: 2849, 25560, 87120, 142976, 116480, 41984, 4096; 8: 8550, 91844, 392352, 859200, 1030400, 660480, 196608, 16384; 9: 25241, 315932, 1625120, 4471232, 7153920, 6736896, 3555328, 901120, 65536;
%F FormulaThe row polynomials satisfy (128*n^3-576*n^2+920*n-516+(64*n-96)*x-(128*n-192)*x^2)*P(n,x) = (192*n^3-448*n^2+308*n-96+(256*n^3-512*n^2+144*n+80)*x-(320*n-384)*x^2-(256*n-256)*x^3)*P(n-1,x) + (80*n^2-160*n+15+(384*n^2-768*n-48)*x+(256*n^2-512*n-608)*x^2-768*x^3-256*x^4)*d/dx P(n-1,x) for n >= 1, with P(0,x) = 1.
%t MathematicaP[0, x_] := 1;
P[n_, x_] := P[n, x] = Expand[Together[((192*n^3 - 448*n^2 + 308*n - 96 + (256*n^3 - 512*n^2 + 144*n + 80)*x - (320*n - 384)*x^2 - (256*n - 256)*x^3)*P[n - 1, x] + (80*n^2 - 160*n + 15 + (384*n^2 - 768*n - 48)*x + (256*n^2 - 512*n - 608)*x^2 - 768*x^3 - 256*x^4)*D[P[n - 1, x], x])/(128*n^3 - 576*n^2 + 920*n - 516 + (64*n - 96)*x - (128*n - 192)*x^2)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten%o PARI/GPP(N) = {my(v = vector(N + 1)); v[1] = 1; for(n = 1, N, my(i = n + 1); v[i] = ((192*n^3 - 448*n^2 + 308*n - 96 + (256*n^3 - 512*n^2 + 144*n + 80)*x - (320*n - 384)*x^2 - (256*n - 256)*x^3)*v[i - 1] + (80*n^2 - 160*n + 15 + (384*n^2 - 768*n - 48)*x + (256*n^2 - 512*n - 608)*x^2 - 768*x^3 - 256*x^4)*deriv(v[i - 1], x))/(128*n^3 - 576*n^2 + 920*n - 516 + (64*n - 96)*x - (128*n - 192)*x^2)); 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
- Real-rooted? Every row P_n, n ≥ 0, is zero or real-rooted with all roots in (−∞, 0]
-
Coefficients of one sign?
Every nonzero row, n ≥ 0: the coefficients of P_n have one sign
derived from Laguerre’s theorem on differential operators
-
Hadamard kernel (Malo)?
Rows P_n, n ≥ 0, are Hadamard kernels (preserve real-rootedness)
derived from Laguerre’s theorem on differential operators
- Interlacing of consecutive rows? Rows P_(m-1), P_m interlace (weak, unordered) for every m ≥ 2
Proof chains ? JSON
-
Laguerre’s theorem on differential operators [SP14] polytool ? step ›
-
from
basis_map_A013611 of Triangle T(n,k), read by rows given by [1,0,1,0,0,0,0,0,0,...] DELTA [0,1,0,0,0,0,0,0,0,...] where…?
-
Geometric basis map (elementary) polytool ? step ›
-
Geometric basis map (elementary) polytool ? step ›
-
-
from
basis_map_A013611 of Triangle T(n,k), read by rows given by [1,0,1,0,0,0,0,0,0,...] DELTA [0,1,0,0,0,0,0,0,0,...] where…?
References
- [Fav35] Jean Favard. Sur les polynômes de tchebicheff. C. R. Acad. Sci. Paris, 200:2052–2053, 1935.
- [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
- [SP14] J Schur and G Polya. Über zwei Arten von Faktorenfolgen in der Theorie der algebraischen Gleichungen. J. Reine Angew. Math., 1914.
- [Sze39] G. Szegő. Orthogonal Polynomials. Colloquium publications, American Mathematical Society, 1939. doi:10.1090/coll/023