{"id":"n-17f334db6f3feea7","revision":0,"first_index":1,"fingerprint":"f6-7af5d5c3f437902e","name":"one_plus_derivative of Triangle of second-order Eulerian numbers T(n,k) (n>=0, 0 <= k <= n) read by rows.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"irregular","degree_slope":null,"degree_intercept":null,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["1"],["1"],["3","2"],["9","20","6"],["23","138","130","24"],["53","708","1660","924","120"],["115","3018","14652","19232","7308","720"],["241","11460","101970","264680","228060","64224","5040"],["495","40394","607350","2771880","4570540","2832120","623376","40320"],["1005","135524","3254760","24124500","67965820","78597840","37163736","6636960","362880"],["2027","439722","16197328","184386160","821551920","1588786808","1374213288","516899232","76998240","3628800"],["4073","1394148","76426750","1282722784","8556291240","25664554832","36497842752","24702013680","7622689536","967524480","39916800"],["8167","4349418","346799754","8320807480","79796286696","351797353488","764304429952","838778754816","459294506640","119065492224","13096736640","479001600"],["16357","13415748","1528477524","51186530380","684286918896","4260643698528","13415040542512","22217112429696","19497582429840","8862374029824","1966626380160","190060335360","6227020800"],["32739","41048714","6589997412","302254038720","5498398614308","46893669408768","205734202612176","488254897782848","640049749723440","461624155697952","177749522252928","34282814699520","2944310342400","87178291200"]],"degrees":[0,0,1,2,3,4,5,6,7,8,9,10,11,12,13],"row_sums":["1","1","5","35","315","3465","45045","675675","11486475","218243025","4583103525","105411381075","2635284526875","71152682225625","2063427784543125"],"nonn":true,"definitions":[{"position":0,"source":"derived:one_plus_derivative","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":1,"initial_polynomials":[["1"],["1"]],"recurrence":{"denominator":{"coeffs":[["-7","2"],["2","0"]]},"terms":[{"coeff":{"coeffs":[["10","-79","275","-128","12"],["-4","50","-246","78","-4"],["0","-8","76","-12","0"],["0","0","-8","0","0"]]},"deriv_order":0,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["0","5","-42","56","-21","2"],["0","-2","26","-30","6","0"],["0","0","-4","4","0","0"]]},"deriv_order":1,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["-19","83","-31","2"],["6","-50","10","0"],["0","8","0","0"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["0","-7","9","-2"],["0","2","-2","0"]]},"deriv_order":1,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":181075,"position":0,"claim":"real_rooted","from_index":1,"region_key":"(-inf, 0]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},"label":"Real-rooted","description":"Every row P_n, n >= 1, is zero or real-rooted with all roots in (-inf, 0]","region_exact":null,"edges":["e-06a6587f1ae52575"]},{"id":181076,"position":1,"claim":"one_signed_coefficients","from_index":1,"region_key":null,"provenance":"derived_from_edges","claim_data":{"alternating":false,"claim":"one_signed_coefficients","from_index":1},"label":"Coefficients of one sign","description":"Every nonzero row, n >= 1: the coefficients of P_n have one sign","region_exact":null,"edges":["e-06a6587f1ae52575"]},{"id":181077,"position":2,"claim":"hadamard_kernel","from_index":1,"region_key":null,"provenance":"derived_from_edges","claim_data":{"claim":"hadamard_kernel","from_index":1},"label":"Hadamard kernel (Malo)","description":"Rows P_n, n >= 1, are Hadamard kernels (preserve real-rootedness)","region_exact":null,"edges":["e-06a6587f1ae52575"]},{"id":181078,"position":3,"claim":"interlacing","from_index":2,"region_key":null,"provenance":"edges","claim_data":{"claim":"interlacing","from_index":2,"kind":"weak","orientation":"unordered"},"label":"Interlacing of consecutive rows","description":"Rows P_(m-1), P_m interlace (weak, unordered) for every m >= 2","region_exact":null,"edges":["e-06a6587f1ae52575"]}],"region_exact":{},"incoming_edges":[{"id":"e-06a6587f1ae52575","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"derivative_polynomial\",\"coefficients\":[{\"numerator\":[\"1\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"derivative_polynomial, shift 0","conclusion_id":"n-17f334db6f3feea7","premise_count":1,"theorem":"Laguerre's theorem on differential operators: if phi is a real polynomial with only real roots, then phi(D) maps every real-rooted polynomial to a real-rooted polynomial or zero (write phi(D) = C D^j prod (1 + c_i D); D preserves real-rootedness by Rolle's theorem and p + c p' is real-rooted for every real c by Rolle's theorem applied to e^(x/c) p; Polya--Schur 1914); when the coefficients of phi have one sign, coefficients of one sign stay of one sign; applied to phi(n, .) for each n","lean_route":null,"lean_declarations":["RealRooted.splits_add_C_mul_derivative_all","RealRooted.splits_C_mul_add_derivative","Polynomial.Splits.derivative"],"certificate_hash":"fc3bd2f0f2f6bf1783cc579ac69801643a940ae249df05926a5429f82eb23b8c","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},{"claim":"interlacing","from_index":2,"kind":"weak","orientation":"unordered"}],"premises":[{"position":0,"node_id":"n-e2f0f447a502f269","role":"sequence","name":"Triangle of second-order Eulerian numbers T(n,k) (n>=0, 0 <= k <= n) read by rows.","uses":{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},"uses_text":"Every row P_n, n >= 1, is zero or real-rooted with all roots in (-inf, 0]"}]}],"used_by":[],"used_by_total":0,"links":[{"id":"l-4bc51b2d90d75dca","kind":"fingerprint_related","node_a_id":"n-17f334db6f3feea7","node_b_id":"n-45531665af5787a9","fingerprint":"f6-7af5d5c3f437902e","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-7af5d5c3f437902e"},"other_id":"n-45531665af5787a9","other":{"id":"n-45531665af5787a9","name":"one_plus_derivative of Second-order Eulerian triangle T(n,k), 1 <= k <= n.","first_index":0,"fingerprint":"f6-7af5d5c3f437902e","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["1"],["3","2"],["9","20","6"]],"card_rows":[["1"],["3","2"],["9","20","6"],["23","138","130","24"]],"row_sums_preview":["1","5","35","315","3465","45045","675675","11486475"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-d4c21302c908a2cf","steps":["D+1"],"edges":["e-a068b9040b0c255c"],"text":"A008517 \u2192 D+1"},"headline":"A008517 \u2192 D+1","chain":null}}],"oeis":[],"bfiles":[],"oeis_texts":[{"oeis_id":"","target":"node","first_row":1,"oeis_offset":1,"reversed":false,"trim_zeros":"none","regular_triangle":false,"rows_shown":10,"polytool_commit":"c48629374597092cc41ef4d6273f37991516f984","triangle_example":"Triangle begins:\n   1:    1;\n   2:    1;\n   3:    3,      2;\n   4:    9,     20,       6;\n   5:   23,    138,     130,       24;\n   6:   53,    708,    1660,      924,      120;\n   7:  115,   3018,   14652,    19232,     7308,      720;\n   8:  241,  11460,  101970,   264680,   228060,    64224,     5040;\n   9:  495,  40394,  607350,  2771880,  4570540,  2832120,   623376,   40320;\n  10: 1005, 135524, 3254760, 24124500, 67965820, 78597840, 37163736, 6636960, 362880;\n","recurrence_sentence":"The row polynomials satisfy (2*n-7+2*x)*P(n,x) = -(4*n-10+(8*n^2-50*n+79)*x+(8*n^3-76*n^2+246*n-275)*x^2+(12*n^2-78*n+128)*x^3+(4*n-12)*x^4)*P(n-2,x) - ((2*n-5)*x+(4*n^2-26*n+42)*x^2-(4*n^2-30*n+56)*x^3-(6*n-21)*x^4-2*x^5)*d/dx P(n-2,x) + (6*n-19+(8*n^2-50*n+83)*x+(10*n-31)*x^2+2*x^3)*P(n-1,x) + ((2*n-7)*x-(2*n-9)*x^2-2*x^3)*d/dx P(n-1,x) for n >= 3, with P(1,x) = 1, P(2,x) = 1.","mathematica":"P[1, x_] := 1;\nP[2, x_] := 1;\nP[n_, x_] := P[n, x] = Expand[Together[(-(4*n - 10 + (8*n^2 - 50*n + 79)*x + (8*n^3 - 76*n^2 + 246*n - 275)*x^2 + (12*n^2 - 78*n + 128)*x^3 + (4*n - 12)*x^4)*P[n - 2, x] - ((2*n - 5)*x + (4*n^2 - 26*n + 42)*x^2 - (4*n^2 - 30*n + 56)*x^3 - (6*n - 21)*x^4 - 2*x^5)*D[P[n - 2, x], x] + (6*n - 19 + (8*n^2 - 50*n + 83)*x + (10*n - 31)*x^2 + 2*x^3)*P[n - 1, x] + ((2*n - 7)*x - (2*n - 9)*x^2 - 2*x^3)*D[P[n - 1, x], x])/(2*n - 7 + 2*x)]];\nTable[CoefficientList[P[n, x], x], {n, 1, 10}] // Flatten","pari":"P(N) = {my(v = vector(N)); v[1] = 1; v[2] = 1; for(n = 3, N, my(i = n); v[i] = (-(4*n - 10 + (8*n^2 - 50*n + 79)*x + (8*n^3 - 76*n^2 + 246*n - 275)*x^2 + (12*n^2 - 78*n + 128)*x^3 + (4*n - 12)*x^4)*v[i - 2] - ((2*n - 5)*x + (4*n^2 - 26*n + 42)*x^2 - (4*n^2 - 30*n + 56)*x^3 - (6*n - 21)*x^4 - 2*x^5)*deriv(v[i - 2], x) + (6*n - 19 + (8*n^2 - 50*n + 83)*x + (10*n - 31)*x^2 + 2*x^3)*v[i - 1] + ((2*n - 7)*x - (2*n - 9)*x^2 - 2*x^3)*deriv(v[i - 1], x))/(2*n - 7 + 2*x)); v};\nrow(n, p) = {my(c = Vecrev(p)); c};\nT(N) = {my(v = P(N)); concat(vector(#v, i, row(i, v[i])))};\nT(10)","reading":{"first_row":1,"offset":1,"reversed":false,"trim_zeros":"none","regular_triangle":false}}],"derivation":{"root":"n-e2f0f447a502f269","steps":["D+1"],"edges":["e-06a6587f1ae52575"],"text":"A201637 \u2192 D+1"},"headline":"A201637 \u2192 D+1","chain":null}