{"id":"n-b4dda1b855c1485c","revision":0,"first_index":0,"fingerprint":"f6-6d973dca5f5aeef0","name":"theta_plus_one of veronese_section_2_1 of Even-numbered rows of Pascal's triangle.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":1,"degree_intercept":-1,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[[],["2"],["4","8"],["6","40","18"],["8","112","168","32"],["10","240","756","480","50"],["12","440","2376","3168","1100","72"],["14","728","6006","13728","10010","2184","98"],["16","1120","13104","45760","57200","26208","3920","128"],["18","1632","25704","127296","243100","190944","59976","6528","162"],["20","2280","46512","310080","839800","1007760","542640","124032","10260","200"],["22","3080","79002","682176","2487100","4232592","3481940","1364352","237006","15400","242"],["24","4048","127512","1384416","6537520","14976864","17473008","10460032","3114936","425040","22264","288"],["26","5200","197340","2631200","15622750","46356960","72804200","61809280","28120950","6578000","723580","31200","338"],["28","6552","294840","4736160","34534500","128845080","262095120","299537280","193267620","69069000","13024440","1179360","42588","392"]],"degrees":[-1,0,1,2,3,4,5,6,7,8,9,10,11,12,13],"row_sums":["0","2","12","64","320","1536","7168","32768","147456","655360","2883584","12582912","54525952","234881024","1006632960"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["0"],["2"]],"recurrence":{"denominator":{"coeffs":[["1","-1"],["-1","4"],["0","-5"],["0","2"]]},"terms":[{"coeff":{"coeffs":[["0","8","4"],["-1","-5","-2"],["0","-3","-9"],["0","2","6"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["0","-2","0","2"],["0","0","0","0"],["0","0","4","-4"]]},"deriv_order":1,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":175512,"position":0,"claim":"real_rooted","from_index":0,"region_key":"(-inf, 0]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"0"}}},"label":"Real-rooted","description":"Every row P_n, n >= 0, is zero or real-rooted with all roots in (-inf, 0]","region_exact":null,"edges":["e-feaf09a79c417e44"]},{"id":175513,"position":1,"claim":"one_signed_coefficients","from_index":0,"region_key":null,"provenance":"derived_from_edges","claim_data":{"alternating":false,"claim":"one_signed_coefficients","from_index":0},"label":"Coefficients of one sign","description":"Every nonzero row, n >= 0: the coefficients of P_n have one sign","region_exact":null,"edges":["e-feaf09a79c417e44"]},{"id":175514,"position":2,"claim":"hadamard_kernel","from_index":0,"region_key":null,"provenance":"derived_from_edges","claim_data":{"claim":"hadamard_kernel","from_index":0},"label":"Hadamard kernel (Malo)","description":"Rows P_n, n >= 0, are Hadamard kernels (preserve real-rootedness)","region_exact":null,"edges":["e-feaf09a79c417e44"]}],"region_exact":{},"incoming_edges":[{"id":"e-feaf09a79c417e44","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"euler_polynomial\",\"coefficients\":[{\"numerator\":[\"1\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"euler_polynomial, shift 0","conclusion_id":"n-b4dda1b855c1485c","premise_count":1,"theorem":"Laguerre's theorem on multiplier sequences: if f is a real polynomial whose roots are all real and <= 0, then (f(k))_(k >= 0) is a multiplier sequence, so x^k -> f(k) x^k maps every real-rooted polynomial to a real-rooted polynomial or zero (Laguerre; see T. Craven and G. Csordas, Multiplier sequences for fields, Illinois J. Math. 21 (1977); Polya--Schur, Theorem 40 of P. Branden, arXiv:1410.6601: sum_k f(k) x^k / k! = f(theta) e^x = C e^x x^m prod (1 + x/a_j), a_j > 0); f(k) has one sign for k >= 0, so coefficients of one sign stay of one sign; applied to f(n, .) for each n","lean_route":null,"lean_declarations":["RealRooted.isMultiplierSequence_eval_of_roots_nonpos","RealRooted.isPFMultiplierSequence_eval_of_roots_nonpos","RealRooted.isMultiplierSequence_iff_preserves"],"certificate_hash":"5ebd2389ee3cad17b5343b19ae0eb628feebb826a8d9d20e8ecee37448e46c0e","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"0"}}}],"premises":[{"position":0,"node_id":"n-7a03fdbbc6f038d4","role":"sequence","name":"veronese_section_2_1 of Even-numbered rows of Pascal's triangle.","uses":{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"0"}}},"uses_text":"Every row P_n, n >= 0, is zero or real-rooted with all roots in (-inf, 0]"}]}],"used_by":[],"used_by_total":0,"links":[{"id":"l-055b7d08aee46a16","kind":"fingerprint_related","node_a_id":"n-7b9205ef354b4cd5","node_b_id":"n-b4dda1b855c1485c","fingerprint":"f6-6d973dca5f5aeef0","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-6d973dca5f5aeef0"},"other_id":"n-7b9205ef354b4cd5","other":{"id":"n-7b9205ef354b4cd5","name":"theta_plus_one of One half of odd-numbered entries of even-numbered rows of Pascal's triangle A007318.","first_index":0,"fingerprint":"f6-6d973dca5f5aeef0","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["1"],["2","4"],["3","20","9"]],"card_rows":[["1"],["2","4"],["3","20","9"],["4","56","84","16"]],"row_sums_preview":["1","6","32","160","768","3584","16384","73728"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-2245b35ec7cd4857","steps":["\u03b8+1"],"edges":["e-3ace553a0bc1786c"],"text":"A091044 \u2192 \u03b8+1"},"headline":"A091044 \u2192 \u03b8+1","chain":null}}],"oeis":[],"bfiles":[],"oeis_texts":[{"oeis_id":"","target":"node","first_row":0,"oeis_offset":0,"reversed":false,"trim_zeros":"none","regular_triangle":false,"rows_shown":10,"polytool_commit":"c48629374597092cc41ef4d6273f37991516f984","triangle_example":"Triangle begins:\n  0:  0;\n  1:  2;\n  2:  4,    8;\n  3:  6,   40,    18;\n  4:  8,  112,   168,     32;\n  5: 10,  240,   756,    480,     50;\n  6: 12,  440,  2376,   3168,   1100,     72;\n  7: 14,  728,  6006,  13728,  10010,   2184,    98;\n  8: 16, 1120, 13104,  45760,  57200,  26208,  3920,  128;\n  9: 18, 1632, 25704, 127296, 243100, 190944, 59976, 6528, 162;\n","recurrence_sentence":"The row polynomials satisfy -(n-1-(2*n^3-5*n^2+4*n-1)*x)*P(n,x) = -(n-(2*n^3-3*n^2-5*n+8)*x-(6*n^3-9*n^2-2*n+4)*x^2)*P(n-1,x) - (2*x-4*n^2*x^2+(4*n^2-2)*x^3)*d/dx P(n-1,x) for n >= 2, with P(0,x) = 0, P(1,x) = 2.","mathematica":"P[0, x_] := 0;\nP[1, x_] := 2;\nP[n_, x_] := P[n, x] = Expand[Together[(-(n - (2*n^3 - 3*n^2 - 5*n + 8)*x - (6*n^3 - 9*n^2 - 2*n + 4)*x^2)*P[n - 1, x] - (2*x - 4*n^2*x^2 + (4*n^2 - 2)*x^3)*D[P[n - 1, x], x])/(-n + 1 + (2*n^3 - 5*n^2 + 4*n - 1)*x)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 0; v[2] = 2; for(n = 2, N, my(i = n + 1); v[i] = (-(n - (2*n^3 - 3*n^2 - 5*n + 8)*x - (6*n^3 - 9*n^2 - 2*n + 4)*x^2)*v[i - 1] - (2*x - 4*n^2*x^2 + (4*n^2 - 2)*x^3)*deriv(v[i - 1], x))/(-n + 1 + (2*n^3 - 5*n^2 + 4*n - 1)*x)); v};\nrow(n, p) = {my(c = Vecrev(p)); c};\nT(N) = {my(v = P(N)); concat(vector(#v, i, row(i - 1, v[i])))};\nT(9)","reading":{"first_row":0,"offset":0,"reversed":false,"trim_zeros":"none","regular_triangle":false}}],"derivation":{"root":"n-08f49539099949d5","steps":["Veronese 2 (j=1)","\u03b8+1"],"edges":["e-7b8f3a8fe3cbfab2","e-feaf09a79c417e44"],"text":"A034870 \u2192 Veronese 2 (j=1) \u2192 \u03b8+1"},"headline":"A034870 \u2192 Veronese 2 (j=1) \u2192 \u03b8+1","chain":null}