{"id":"n-f714ad53b60ca2b8","revision":0,"first_index":0,"fingerprint":"f6-bd43e5bf90f88fc7","name":"shift_x_plus_one of veronese_section_2_0 of Triangle read by rows, T(n,k) = GegenbauerC(m,-n,-3/2) where m = k if k<n else 2*n-k, for n>=0 and 0<=k<=2n.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":1,"degree_intercept":0,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["1"],["2","1"],["13","13","1"],["62","93","33","1"],["313","626","375","62","1"],["1562","3905","3320","1075","100","1"],["7813","23439","25782","12499","2490","147","1"],["39062","136717","184569","119630","37513","4998","203","1"],["195313","781252","1250002","1015624","438475","95704","9058","268","1"],["976562","4394529","8129880","7946778","4386294","1352691","216132","15210","342","1"],["4882813","24414065","51269535","58593750","39459225","15838623","3655245","444030","24075","425","1"],["24414062","134277341","315551753","412902831","328559880","163021089","49756047","8890629","845988","36355","517","1"],["122070313","732421878","1904296881","2807617190","2579040522","1527099606","583076481","139732362","19850490","1515866","52833","618","1"],["610351562","3967285153","11306762688","18547058101","19323158270","13311481482","6121830936","1855294701","357793722","41285530","2581436","74373","728","1"],["3051757813","21362304691","66223144540","119628906257","139415740961","109615325918","59082126621","21751785285","5356602069","847828982","80889809","4211753","101920","847","1"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","3","27","189","1377","9963","72171","522693","3785697","27418419","198581787","1438256493","10416775041","75444958683","546420727467"],"nonn":true,"definitions":[{"position":0,"source":"derived:shift_x_plus_one","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"],["2","1"]],"recurrence":{"denominator":{"coeffs":[["-2"],["2"]]},"terms":[{"coeff":{"coeffs":[["2","-12"],["-7","16"],["5","-4"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["50","34","-18"],["-20","-12","8"]]},"deriv_order":1,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["20","40","16","-4"]]},"deriv_order":2,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}},{"position":1,"source":"derived:basis_map_A007318","source_kind":"derived","equality_edge_id":"e-51be81e87ebdaeb1","recurrence":{"first_index":0,"initial_polynomials":[["1"],["2","1"]],"recurrence":{"terms":[{"coeff":{"coeffs":[["5","5","-1"]]},"deriv_order":0,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["4","2"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":178086,"position":0,"claim":"real_rooted","from_index":0,"region_key":"(-inf, -1]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"-1"}}},"label":"Real-rooted","description":"Every row P_n, n >= 0, is zero or real-rooted with all roots in (-inf, -1]","region_exact":null,"edges":["e-43d89167bffcc8ef"]},{"id":178087,"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-43d89167bffcc8ef","e-585d39e7ec6d37f9"]},{"id":178088,"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-43d89167bffcc8ef","e-585d39e7ec6d37f9"]},{"id":178089,"position":3,"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-585d39e7ec6d37f9"]},{"id":178090,"position":4,"claim":"interlacing","from_index":1,"region_key":null,"provenance":"edges","claim_data":{"claim":"interlacing","from_index":1,"kind":"weak","orientation":"unordered"},"label":"Interlacing of consecutive rows","description":"Rows P_(m-1), P_m interlace (weak, unordered) for every m >= 1","region_exact":null,"edges":["e-585d39e7ec6d37f9"]}],"region_exact":{},"incoming_edges":[{"id":"e-585d39e7ec6d37f9","operation":{"map":"A007318","operation":"basis_map"},"operation_detail":"A007318","conclusion_id":"n-f714ad53b60ca2b8","premise_count":1,"theorem":"geometric family P_k = g(t) (a + d t)^k: T(p) = g(t) p(a + d t), so the roots of T(p) are those of g and the points (r - a)/d for the roots r of p (elementary)","lean_route":null,"lean_declarations":[],"certificate_hash":"3b617b34f73e76432d76f8a9391564b40293c684a56ea0d7d5fea18bdc497bb9","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"0"}}},{"claim":"interlacing","from_index":1,"kind":"weak","orientation":"unordered"}],"premises":[{"position":0,"node_id":"n-78b19c28b9f05152","role":"sequence","name":"veronese_section_2_0 of Triangle read by rows, T(n,k) = GegenbauerC(m,-n,-3/2) where m = k if k<n else 2*n-k, for n>=0 and 0<=k<=2n.","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]"}]},{"id":"e-51be81e87ebdaeb1","operation":{"operation":"definition_equality"},"operation_detail":null,"conclusion_id":"n-f714ad53b60ca2b8","premise_count":0,"theorem":"all-index identity Q_n = P_n certified by exact Ore-algebra division and identifying rows (polytool preserver-image certificate of the identity map)","lean_route":null,"lean_declarations":[],"certificate_hash":"72f38775075ea575eb1fe044172a251c528d24b24691ceac97530cdb21d09a84","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[],"premises":[]},{"id":"e-43d89167bffcc8ef","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"affine\",\"slope\":\"1\",\"intercept\":\"1\"}"},"operation_detail":"affine, shift 0","conclusion_id":"n-f714ad53b60ca2b8","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":null,"lean_declarations":["Polynomial.Splits.comp_of_degree_le_one"],"certificate_hash":"a23b3dd4885c14a66e2aaf1c4d14993db0c98bd694db38007e0740a04156da0c","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"-1"}}}],"premises":[{"position":0,"node_id":"n-78b19c28b9f05152","role":"sequence","name":"veronese_section_2_0 of Triangle read by rows, T(n,k) = GegenbauerC(m,-n,-3/2) where m = k if k<n else 2*n-k, for n>=0 and 0<=k<=2n.","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-186fc6e06a0c9d0b","kind":"fingerprint_related","node_a_id":"n-f714ad53b60ca2b8","node_b_id":"n-efb049ae8c6d52aa","fingerprint":"f6-bd43e5bf90f88fc7","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-bd43e5bf90f88fc7"},"other_id":"n-efb049ae8c6d52aa","other":{"id":"n-efb049ae8c6d52aa","name":"mobius_x_over_x_plus_one of veronese_section_2_0 of Triangle read by rows, T(n,k) = GegenbauerC(m,-n,-3/2) where m = k if k<n else 2*n-k, for n>=0 and 0<=k<=2n.","first_index":0,"fingerprint":"f6-bd43e5bf90f88fc7","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["1"],["1","2"],["1","13","13"]],"card_rows":[["1"],["1","2"],["1","13","13"],["1","33","93","62"]],"row_sums_preview":["1","3","27","189","1377","9963","72171","522693"],"regions":["[-1, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-b30e7a5b4198051a","steps":["Veronese 2","x \u21a6 x/(x+1)"],"edges":["e-864f7f13d69989fc","e-dd0cae54c58a70fb"],"text":"A272866 \u2192 Veronese 2 \u2192 x \u21a6 x/(x+1)"},"headline":"A272866 \u2192 Veronese 2 \u2192 x \u21a6 x/(x+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:      1;\n  1:      2,       1;\n  2:     13,      13,       1;\n  3:     62,      93,      33,       1;\n  4:    313,     626,     375,      62,       1;\n  5:   1562,    3905,    3320,    1075,     100,       1;\n  6:   7813,   23439,   25782,   12499,    2490,     147,      1;\n  7:  39062,  136717,  184569,  119630,   37513,    4998,    203,     1;\n  8: 195313,  781252, 1250002, 1015624,  438475,   95704,   9058,   268,   1;\n  9: 976562, 4394529, 8129880, 7946778, 4386294, 1352691, 216132, 15210, 342, 1;\n","recurrence_sentence":"The row polynomials satisfy (2*n-2)*P(n,x) = (5*n^2-7*n+2-(4*n^2-16*n+12)*x)*P(n-1,x) - (20*n-50+(12*n-34)*x-(8*n-18)*x^2)*d/dx P(n-1,x) + (20+40*x+16*x^2-4*x^3)*d^2/dx^2 P(n-1,x) for n >= 2, with P(0,x) = 1, P(1,x) = 2 + x.","mathematica":"P[0, x_] := 1;\nP[1, x_] := 2 + x;\nP[n_, x_] := P[n, x] = Expand[Together[((5*n^2 - 7*n + 2 - (4*n^2 - 16*n + 12)*x)*P[n - 1, x] - (20*n - 50 + (12*n - 34)*x - (8*n - 18)*x^2)*D[P[n - 1, x], x] + (20 + 40*x + 16*x^2 - 4*x^3)*D[P[n - 1, x], {x, 2}])/(2*n - 2)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 1; v[2] = 2 + x; for(n = 2, N, my(i = n + 1); v[i] = ((5*n^2 - 7*n + 2 - (4*n^2 - 16*n + 12)*x)*v[i - 1] - (20*n - 50 + (12*n - 34)*x - (8*n - 18)*x^2)*deriv(v[i - 1], x) + (20 + 40*x + 16*x^2 - 4*x^3)*deriv(deriv(v[i - 1], x), x))/(2*n - 2)); 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-b30e7a5b4198051a","steps":["Veronese 2","x \u21a6 x+1"],"edges":["e-864f7f13d69989fc","e-43d89167bffcc8ef"],"text":"A272866 \u2192 Veronese 2 \u2192 x \u21a6 x+1"},"headline":"A272866 \u2192 Veronese 2 \u2192 x \u21a6 x+1","chain":null}