A123519 → basis A013611 → D+1
nonnegative coefficients
Proved for all n all roots real, in (−∞, 0]coefficients of one signHadamard kernelinterlacing (weak)
Recurrence
\(\left(246 + 96\,x - 96\,x^{2} + 452\,n + 64\,n x - 64\,n x^{2} + 288\,n^{2} + 64\,n^{3}\right)\,P_{n}(x) = \left(1374 + 3072\,x - 224\,x^{2} - 512\,x^{3} + 1912\,n + 4112\,n x - 128\,n x^{2} - 256\,n x^{3} + 864\,n^{2} + 1792\,n^{2} x + 128\,n^{3} + 256\,n^{3} x\right)\,P_{n-1}(x) + \left(171 + 864\,x + 608\,x^{2} - 512\,x^{3} - 256\,x^{4} + 192\,n + 1024\,n x + 1024\,n x^{2} + 48\,n^{2} + 256\,n^{2} x + 256\,n^{2} x^{2}\right)\,P_{n-1}'(x)\)
\(P_{0}(x) = 67 + 184\,x + 64\,x^{2}\)
Rows ?
| n | x0 | x1 | x2 | x3 | x4 | x5 | x6 | x7 | x8 | x9 | Pn(1) |
|---|---|---|---|---|---|---|---|---|---|---|---|
| 0 | 67 | 184 | 64 | 315 | |||||||
| 1 | 345 | 1712 | 2240 | 512 | 4809 | ||||||
| 2 | 1641 | 11856 | 28224 | 24064 | 4096 | 69881 | |||||
| 3 | 7443 | 70744 | 246976 | 382976 | 241664 | 32768 | 982571 | ||||
| 4 | 32699 | 385640 | 1781120 | 4057088 | 4648960 | 2326528 | 262144 | 13494179 | |||
| 5 | 140401 | 1977952 | 11382912 | 34370560 | 57856000 | 52494336 | 21757952 | 2097152 | 182077265 | ||
| 6 | 592529 | 9708960 | 66956160 | 252382208 | 563507200 | 750714880 | 563347456 | 199229440 | 16777216 | 2423216049 | |
| 7 | 2467163 | 46100904 | 370697856 | 1677162496 | 4678406144 | 8267399168 | 9103474688 | 5821693952 | 1795162112 | 134217728 | 31896782211 |
Compute more
?
Technical details
- Node id
n-850be5acc9f192c8· revision 0 · JSON- Definition source
derived:one_plus_derivative- Fingerprint
f6-addbf527d1f3ca48
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 ExampleTriangle begins: 0: 67, 184, 64; 1: 345, 1712, 2240, 512; 2: 1641, 11856, 28224, 24064, 4096; 3: 7443, 70744, 246976, 382976, 241664, 32768; 4: 32699, 385640, 1781120, 4057088, 4648960, 2326528, 262144; 5: 140401, 1977952, 11382912, 34370560, 57856000, 52494336, 21757952, 2097152; 6: 592529, 9708960, 66956160, 252382208, 563507200, 750714880, 563347456, 199229440, 16777216; 7: 2467163, 46100904, 370697856, 1677162496, 4678406144, 8267399168, 9103474688, 5821693952, 1795162112, 134217728; 8: 10162291, 213283096, 1959620544, 10352052224, 34689191936, 76607225856, 111869427712, 104907931648, 58435043328, 15971909632, 1073741824; 9: 41489225, 966320912, 9988185920, 60362286592, 236360314880, 627284639744, 1144773410816, 1423253176320, 1161805430784, 573109698560, 140660178944, 8589934592;
%F FormulaThe row polynomials satisfy (64*n^3+288*n^2+452*n+246+(64*n+96)*x-(64*n+96)*x^2)*P(n,x) = (128*n^3+864*n^2+1912*n+1374+(256*n^3+1792*n^2+4112*n+3072)*x-(128*n+224)*x^2-(256*n+512)*x^3)*P(n-1,x) + (48*n^2+192*n+171+(256*n^2+1024*n+864)*x+(256*n^2+1024*n+608)*x^2-512*x^3-256*x^4)*d/dx P(n-1,x) for n >= 1, with P(0,x) = 67 + 184*x + 64*x^2.
%t MathematicaP[0, x_] := 67 + 184*x + 64*x^2;
P[n_, x_] := P[n, x] = Expand[Together[((128*n^3 + 864*n^2 + 1912*n + 1374 + (256*n^3 + 1792*n^2 + 4112*n + 3072)*x - (128*n + 224)*x^2 - (256*n + 512)*x^3)*P[n - 1, x] + (48*n^2 + 192*n + 171 + (256*n^2 + 1024*n + 864)*x + (256*n^2 + 1024*n + 608)*x^2 - 512*x^3 - 256*x^4)*D[P[n - 1, x], x])/(64*n^3 + 288*n^2 + 452*n + 246 + (64*n + 96)*x - (64*n + 96)*x^2)]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten%o PARI/GPP(N) = {my(v = vector(N + 1)); v[1] = 67 + 184*x + 64*x^2; for(n = 1, N, my(i = n + 1); v[i] = ((128*n^3 + 864*n^2 + 1912*n + 1374 + (256*n^3 + 1792*n^2 + 4112*n + 3072)*x - (128*n + 224)*x^2 - (256*n + 512)*x^3)*v[i - 1] + (48*n^2 + 192*n + 171 + (256*n^2 + 1024*n + 864)*x + (256*n^2 + 1024*n + 608)*x^2 - 512*x^3 - 256*x^4)*deriv(v[i - 1], x))/(64*n^3 + 288*n^2 + 452*n + 246 + (64*n + 96)*x - (64*n + 96)*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 ≥ 1
Proof chains ? JSON
-
Laguerre’s theorem on differential operators [SP14] polytool ? step ›
-
from
basis_map_A013611 of Triangle read by rows: T(n,k) number of tilings of a 2n X 3 grid by dominoes, 2k of which are in a…?
-
Geometric basis map (elementary) polytool ? step ›
-
from
Triangle read by rows: T(n,k) number of tilings of a 2n X 3 grid by dominoes, 2k of which are in a vertical position (0…?
-
Affine, reversal and Möbius substitutions (elementary) polytool ? step ›
-
from
Triangle read by rows: T(n,k) number of tilings of a 2n X 3 grid by dominoes, 2k of which are in a vertical position (0…?
-
Geometric basis map (elementary) polytool ? step ›
-
-
from
basis_map_A013611 of Triangle read by rows: T(n,k) number of tilings of a 2n X 3 grid by dominoes, 2k of which are in a…?
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