{"id":"n-64ab05af64bea805","revision":0,"first_index":0,"fingerprint":"f6-55426929a3969ca5","name":"reversal of basis_map_A013610 of Triangle of coefficients of polynomials u(n,x) jointly generated with A207607; see the Formula section.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":1,"degree_intercept":2,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["18","33","13"],["54","153","132","34"],["162","621","837","465","89"],["486","2349","4320","3753","1530","233"],["1458","8505","19845","23598","15012","4824","610"],["4374","29889","84564","127980","111510","55755","14772","1597"],["13122","102789","341901","629127","698625","478197","196569","44283","4181"],["39366","347733","1329696","2883195","3898692","3402486","1912788","666801","130620","10946"],["118098","1161297","5019165","12535884","20003760","21274407","15247197","7260570","2195694","380415","28657"],["354294","3838185","18502020","52317414","96289236","120951306","105666120","64120815","26456004","7061526","1096596","75025"],["1062882","12577437","66902517","211297005","440800785","639185742","659848518","488086398","256483260","93292020","22278672","3134448","196418"],["3188646","40920957","238085568","830760381","1937791350","3187642167","3800813544","3322853442","2128042854","985205025","320256072","69177834","8896002","514229"],["9565938","132328809","835956693","3193960410","8238752676","15165003546","20524566348","20731815216","15692840370","8851657239","3659900031","1075009698","211942836","25096245","1346269"],["28697814","425684241","2901667860","12048830352","34060053690","69380508285","105130918332","120581502525","105473153214","70310639385","35406628956","13219524162","3540601530","641939409","70431540","3524578"],["86093442","1363146165","9972490365","44719165827","137490695433","307127725515","515295527175","661972259025","657639400869","506619562581","301458964653","137026802115","46620477045","11472613119","1925170011","196772109","9227465"]],"degrees":[2,3,4,5,6,7,8,9,10,11,12,13,14,15,16],"row_sums":["64","373","2174","12671","73852","430441","2508794","14622323","85225144","496728541","2895146102","16874148071","98349742324","573224305873","3340996092914"],"nonn":true,"definitions":[{"position":0,"source":"derived:reversal","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["18","33","13"]],"recurrence":{"denominator":{"coeffs":[["54"],["72"],["24"]]},"terms":[{"coeff":{"coeffs":[["162","207","57","0"],["216","300","95","5"],["72","108","38","5"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["0","-54","-135","-57","0"],["0","-36","-90","-56","-10"]]},"deriv_order":1,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["0","0","0","9","18","5"]]},"deriv_order":2,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":185698,"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-f6cff30a9725b063"]},{"id":185699,"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-f6cff30a9725b063"]},{"id":185700,"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-f6cff30a9725b063"]}],"region_exact":{},"incoming_edges":[{"id":"e-f6cff30a9725b063","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"reversal\",\"schedule\":{\"first_index\":0,\"first_degree\":2,\"step\":1}}"},"operation_detail":"reversal, shift 0","conclusion_id":"n-64ab05af64bea805","premise_count":1,"theorem":"a real affine substitution x -> a x + b (a != 0), the reversal x^d p(1/x) (d >= deg p) and a real Mobius map (c x + e)^d p((a x + b)/(c x + e)) (a e - b c != 0, d >= deg p) map real roots to real roots: a root r of p gives the root (r - b)/a, 1/r (and 0) or (e r - b)/(a - c r) (and -e/c); for an input row that is a polynomial the degree condition holds automatically","lean_route":"reversed","lean_declarations":["RealRooted.X_pow_mul_reverse_eq_zero_or_splits","RealRooted.reflect_eq_zero_or_splits"],"certificate_hash":"97acd544f7fd75c816435ba3fe349b900e236b74eea4054346b95e1843d4fb8c","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-98aa86c8bf356480","role":"sequence","name":"basis_map_A013610 of Triangle of coefficients of polynomials u(n,x) jointly generated with A207607; see the Formula section.","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-a7a51f5ae4d464c1","kind":"fingerprint_related","node_a_id":"n-98aa86c8bf356480","node_b_id":"n-64ab05af64bea805","fingerprint":"f6-55426929a3969ca5","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-55426929a3969ca5"},"other_id":"n-98aa86c8bf356480","other":{"id":"n-98aa86c8bf356480","name":"basis_map_A013610 of Triangle of coefficients of polynomials u(n,x) jointly generated with A207607; see the Formula section.","first_index":0,"fingerprint":"f6-55426929a3969ca5","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["13","33","18"],["34","132","153","54"],["89","465","837","621","162"]],"card_rows":[["13","33","18"],["34","132","153","54"],["89","465","837","621","162"],["233","1530","3753","4320","2349","486"]],"row_sums_preview":["64","373","2174","12671","73852","430441","2508794","14622323"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-dfab35176bd08e72","steps":["basis A013610"],"edges":["e-77ee9774535f66a4"],"text":"A207606 \u2192 basis A013610"},"headline":"A207606 \u2192 basis A013610","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:     18,      33,       13;\n  1:     54,     153,      132,       34;\n  2:    162,     621,      837,      465,       89;\n  3:    486,    2349,     4320,     3753,     1530,       233;\n  4:   1458,    8505,    19845,    23598,    15012,      4824,       610;\n  5:   4374,   29889,    84564,   127980,   111510,     55755,     14772,     1597;\n  6:  13122,  102789,   341901,   629127,   698625,    478197,    196569,    44283,     4181;\n  7:  39366,  347733,  1329696,  2883195,  3898692,   3402486,   1912788,   666801,   130620,   10946;\n  8: 118098, 1161297,  5019165, 12535884, 20003760,  21274407,  15247197,  7260570,  2195694,  380415,   28657;\n  9: 354294, 3838185, 18502020, 52317414, 96289236, 120951306, 105666120, 64120815, 26456004, 7061526, 1096596, 75025;\n","recurrence_sentence":"The row polynomials satisfy (24*n^2+72*n+54)*P(n,x) = (72*n^2+216*n+162+(108*n^2+300*n+207)*x+(38*n^2+95*n+57)*x^2+(5*n^2+5*n)*x^3)*P(n-1,x) - ((36*n+54)*x+(90*n+135)*x^2+(56*n+57)*x^3+10*n*x^4)*d/dx P(n-1,x) + (9*x^3+18*x^4+5*x^5)*d^2/dx^2 P(n-1,x) for n >= 1, with P(0,x) = 18 + 33*x + 13*x^2.","mathematica":"P[0, x_] := 18 + 33*x + 13*x^2;\nP[n_, x_] := P[n, x] = Expand[Together[((72*n^2 + 216*n + 162 + (108*n^2 + 300*n + 207)*x + (38*n^2 + 95*n + 57)*x^2 + (5*n^2 + 5*n)*x^3)*P[n - 1, x] - ((36*n + 54)*x + (90*n + 135)*x^2 + (56*n + 57)*x^3 + 10*n*x^4)*D[P[n - 1, x], x] + (9*x^3 + 18*x^4 + 5*x^5)*D[P[n - 1, x], {x, 2}])/(24*n^2 + 72*n + 54)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 18 + 33*x + 13*x^2; for(n = 1, N, my(i = n + 1); v[i] = ((72*n^2 + 216*n + 162 + (108*n^2 + 300*n + 207)*x + (38*n^2 + 95*n + 57)*x^2 + (5*n^2 + 5*n)*x^3)*v[i - 1] - ((36*n + 54)*x + (90*n + 135)*x^2 + (56*n + 57)*x^3 + 10*n*x^4)*deriv(v[i - 1], x) + (9*x^3 + 18*x^4 + 5*x^5)*deriv(deriv(v[i - 1], x), x))/(24*n^2 + 72*n + 54)); 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-dfab35176bd08e72","steps":["basis A013610","reverse"],"edges":["e-77ee9774535f66a4","e-f6cff30a9725b063"],"text":"A207606 \u2192 basis A013610 \u2192 reverse"},"headline":"A207606 \u2192 basis A013610 \u2192 reverse","chain":null}