A056241: Triangle T(n,k) = number of k-part order-consecutive partitions of n (1<=k<=n).
A056241 ↗ palindromicγ-positivenonnegative coefficients
Proved for all n all roots real, in (−∞, 0)coefficients of one signHadamard kernelinterlacing (weak)
Recurrence from A056241
\(P_{n}(x) = \left(2 + 2\,x\right)\,P_{n-1}(x) + \left(-1 - x - x^{2}\right)\,P_{n-2}(x)\)
\(P_{0}(x) = 1\)
\(P_{1}(x) = 1 + x\)
Rows ?
| n | x0 | x1 | x2 | x3 | x4 | x5 | x6 | x7 | x8 | x9 | x10 | x11 | x12 | x13 | x14 | Pn(1) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 0 | 1 | 1 | ||||||||||||||
| 1 | 1 | 1 | 2 | |||||||||||||
| 2 | 1 | 3 | 1 | 5 | ||||||||||||
| 3 | 1 | 6 | 6 | 1 | 14 | |||||||||||
| 4 | 1 | 10 | 19 | 10 | 1 | 41 | ||||||||||
| 5 | 1 | 15 | 45 | 45 | 15 | 1 | 122 | |||||||||
| 6 | 1 | 21 | 90 | 141 | 90 | 21 | 1 | 365 | ||||||||
| 7 | 1 | 28 | 161 | 357 | 357 | 161 | 28 | 1 | 1094 | |||||||
| 8 | 1 | 36 | 266 | 784 | 1107 | 784 | 266 | 36 | 1 | 3281 | ||||||
| 9 | 1 | 45 | 414 | 1554 | 2907 | 2907 | 1554 | 414 | 45 | 1 | 9842 | |||||
| 10 | 1 | 55 | 615 | 2850 | 6765 | 8953 | 6765 | 2850 | 615 | 55 | 1 | 29525 | ||||
| 11 | 1 | 66 | 880 | 4917 | 14355 | 24068 | 24068 | 14355 | 4917 | 880 | 66 | 1 | 88574 | |||
| 12 | 1 | 78 | 1221 | 8074 | 28314 | 58278 | 73789 | 58278 | 28314 | 8074 | 1221 | 78 | 1 | 265721 | ||
| 13 | 1 | 91 | 1651 | 12727 | 52624 | 129844 | 201643 | 201643 | 129844 | 52624 | 12727 | 1651 | 91 | 1 | 797162 | |
| 14 | 1 | 105 | 2184 | 19383 | 93093 | 270270 | 502593 | 616227 | 502593 | 270270 | 93093 | 19383 | 2184 | 105 | 1 | 2391485 |
b-files: A007051 (row sums), A056241, A056241 (reversed triangle) ?
Compute more
?
Other recurrences
Reversed rows · proved equal for all n (proof step)
\(\left(-2 + 2\,n\right)\,P_{n}(x) = \left(-2 - 6\,x^{2} + 2\,n - n x + 10\,n x^{2} + n^{2} x - 4\,n^{2} x^{2}\right)\,P_{n-1}(x) + \left(2\,x - 6\,x^{2} - 14\,x^{3} + 4\,n x^{2} + 8\,n x^{3}\right)\,P_{n-1}'(x) + \left(-4\,x^{2} - 4\,x^{3} - 4\,x^{4}\right)\,P_{n-1}''(x)\)
\(P_{0}(x) = 1\)
\(P_{1}(x) = 1 + x\)
Technical details
- Node id
n-a6f3b35778192ffb· revision 1 · JSON- Definition source
oeis_catalog:A056241derived:reversal(equal bye-d32fa4f50d269032)- Fingerprint
f6-90ff47d73675b1af
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: yes
- γ-positive (gamma_positive): yes
- Nonnegative coefficients (
nonn): yes - Only rational roots (
rr_by_factors: every nonzero row is a product of linear factors over ℚ): no
Matches ?
- A056241 reversed triangle 65 terms, 10 rows · tabl · nonn · catalog b-file?
- A056241 triangle 65 terms, 10 rows · tabl · nonn · catalog b-file?
Submission text ?
Atlas rows n = 0, …, ascending powers of x
%e ExampleTriangle begins: 0: 1; 1: 1, 1; 2: 1, 3, 1; 3: 1, 6, 6, 1; 4: 1, 10, 19, 10, 1; 5: 1, 15, 45, 45, 15, 1; 6: 1, 21, 90, 141, 90, 21, 1; 7: 1, 28, 161, 357, 357, 161, 28, 1; 8: 1, 36, 266, 784, 1107, 784, 266, 36, 1; 9: 1, 45, 414, 1554, 2907, 2907, 1554, 414, 45, 1;
%F FormulaThe row polynomials satisfy P(n,x) = (2+2*x)*P(n-1,x) - (1+x+x^2)*P(n-2,x) for n >= 2, with P(0,x) = 1, P(1,x) = 1 + x.
%t MathematicaP[0, x_] := 1;
P[1, x_] := 1 + x;
P[n_, x_] := P[n, x] = Expand[(2 + 2*x)*P[n - 1, x] - (1 + x + x^2)*P[n - 2, x]];
Table[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten%o PARI/GPP(N) = {my(v = vector(N + 1)); v[1] = 1; v[2] = 1 + x; for(n = 2, N, my(i = n + 1); v[i] = (2 + 2*x)*v[i - 1] - (1 + x + x^2)*v[i - 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
A056241 triangle, offset 1, from P0
%e ExampleTriangle begins: 1: 1; 2: 1, 1; 3: 1, 3, 1; 4: 1, 6, 6, 1; 5: 1, 10, 19, 10, 1; 6: 1, 15, 45, 45, 15, 1; 7: 1, 21, 90, 141, 90, 21, 1; 8: 1, 28, 161, 357, 357, 161, 28, 1; 9: 1, 36, 266, 784, 1107, 784, 266, 36, 1; 10: 1, 45, 414, 1554, 2907, 2907, 1554, 414, 45, 1;
%F FormulaThe row polynomials satisfy P(n,x) = (2+2*x)*P(n-1,x) - (1+x+x^2)*P(n-2,x) for n >= 3, with P(1,x) = 1, P(2,x) = 1 + x.
%t MathematicaP[1, x_] := 1;
P[2, x_] := 1 + x;
P[n_, x_] := P[n, x] = Expand[(2 + 2*x)*P[n - 1, x] - (1 + x + x^2)*P[n - 2, x]];
Table[PadRight[CoefficientList[P[n, x], x], n], {n, 1, 10}] // Flatten%o PARI/GPP(N) = {my(v = vector(N)); v[1] = 1; v[2] = 1 + x; for(n = 3, N, my(i = n); v[i] = (2 + 2*x)*v[i - 1] - (1 + x + x^2)*v[i - 2]); v};
row(n, p) = {my(c = Vecrev(p)); c = concat(c, vector(n - #c)); c};
T(N) = {my(v = P(N)); concat(vector(#v, i, row(i, v[i])))};
T(10)polytool c48629374597
A056241 reversed triangle, offset 1, from P0
%e ExampleTriangle begins: 1: 1; 2: 1, 1; 3: 1, 3, 1; 4: 1, 6, 6, 1; 5: 1, 10, 19, 10, 1; 6: 1, 15, 45, 45, 15, 1; 7: 1, 21, 90, 141, 90, 21, 1; 8: 1, 28, 161, 357, 357, 161, 28, 1; 9: 1, 36, 266, 784, 1107, 784, 266, 36, 1; 10: 1, 45, 414, 1554, 2907, 2907, 1554, 414, 45, 1;
%F FormulaRow n lists the coefficients of P(n,x) in descending powers of x, where P(n,x) = (2+2*x)*P(n-1,x) - (1+x+x^2)*P(n-2,x) for n >= 3, with P(1,x) = 1, P(2,x) = 1 + x.
%t MathematicaP[1, x_] := 1;
P[2, x_] := 1 + x;
P[n_, x_] := P[n, x] = Expand[(2 + 2*x)*P[n - 1, x] - (1 + x + x^2)*P[n - 2, x]];
Table[Reverse[PadRight[CoefficientList[P[n, x], x], n]], {n, 1, 10}] // Flatten%o PARI/GPP(N) = {my(v = vector(N)); v[1] = 1; v[2] = 1 + x; for(n = 3, N, my(i = n); v[i] = (2 + 2*x)*v[i - 1] - (1 + x + x^2)*v[i - 2]); v};
row(n, p) = {my(c = Vecrev(p)); c = concat(c, vector(n - #c)); c = Vecrev(c); c};
T(N) = {my(v = P(N)); concat(vector(#v, i, row(i, v[i])))};
T(10)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
- Hadamard kernel (Malo)? Rows P_n, n ≥ 0, are Hadamard kernels (preserve real-rootedness)
- Interlacing of consecutive rows? Rows P_(m-1), P_m interlace (weak, previous interlaces next) for every m ≥ 1
- Real-rooted? Every row P_n, n ≥ 0, is zero or real-rooted with all roots in (−∞, 0]
Proof chains ? JSON
Used in 12
- shift_x_plus_one of Triangle T(n,k) = number of k-part order-consecutive partit… Image under a basis map u^k -> P_k (A007318)
- basis_map_A013609 of Triangle T(n,k) = number of k-part order-consecutive parti… Image under a basis map u^k -> P_k (A013609)
- basis_map_A008277 of Triangle T(n,k) = number of k-part order-consecutive parti… Image under a basis map u^k -> P_k (A008277)
- basis_map_A013611 of Triangle T(n,k) = number of k-part order-consecutive parti… Image under a basis map u^k -> P_k (A013611)
- basis_map_A013610 of Triangle T(n,k) = number of k-part order-consecutive parti… Image under a basis map u^k -> P_k (A013610)
- Triangle T(n,k) = number of k-part order-consecutive partitions of n (1<=k<=n). Image under a real-rootedness preserver (reversal, shift 0)
- theta_plus_one_squared of Triangle T(n,k) = number of k-part order-consecutive … Image under a real-rootedness preserver (euler polynomial, shift 0)
- theta_plus_one of Triangle T(n,k) = number of k-part order-consecutive partitio… Image under a real-rootedness preserver (euler polynomial, shift 0)
4 more
- mobius_x_over_x_plus_one of Triangle T(n,k) = number of k-part order-consecutiv… Image under a real-rootedness preserver (mobius, shift 0)
- shift_x_plus_one of Triangle T(n,k) = number of k-part order-consecutive partit… Image under a real-rootedness preserver (affine, shift 0)
- derivative of Triangle T(n,k) = number of k-part order-consecutive partitions o… Image under a real-rootedness preserver (derivative polynomial, shift 0)
- one_plus_derivative of Triangle T(n,k) = number of k-part order-consecutive par… Image under a real-rootedness preserver (derivative polynomial, shift 0)
References
- [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