{"id":"n-47772097820bf4fe","revision":0,"first_index":0,"fingerprint":"f6-55e87460da7bf930","name":"shift_x_plus_one of basis_map_A007318 of Riordan array (1/(1-2*x), x*(1+x)/(1-2*x)).","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"],["4","1"],["18","9","1"],["80","60","14","1"],["356","356","127","19","1"],["1584","1980","952","219","24","1"],["7048","10572","6398","1993","336","29","1"],["31360","54880","40048","15760","3604","478","34","1"],["139536","279072","238440","113472","32841","5910","645","39","1"],["620864","1396944","1367808","763896","267804","61041","9036","837","44","1"],["2762528","6906320","7624128","4888776","2014266","556629","104385","13107","1054","49","1"],["12291840","33802560","41535392","30074832","14245344","4630668","1053282","167523","18248","1296","54","1"],["54692416","164077248","222098704","179236400","95973516","35895540","9609195","1853973","255730","24584","1563","59","1"],["243353344","790898368","1169345408","1040729360","621695984","263062356","81069552","18413415","3080912","374906","32240","1855","64","1"],["1082798208","3789793728","6076554656","5912834352","3898696728","1841710004","642454494","168040353","33102496","4885434","531576","41341","2172","69","1"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","5","28","155","859","4760","26377","146165","809956","4488275","24871243","137821040","763718929","4232057765","23451445612"],"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"]],"recurrence":{"denominator":{"coeffs":[["0"],["1"]]},"terms":[{"coeff":{"coeffs":[["8","2"],["-7","-1"],["3","0"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["60","36","4"],["-24","-12","-1"]]},"deriv_order":1,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["48","48","14","1"]]},"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-fdfc0c621074efe4","recurrence":{"first_index":0,"initial_polynomials":[["1"],["4","1"]],"recurrence":{"terms":[{"coeff":{"coeffs":[["2","1"]]},"deriv_order":0,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["4","1"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":177141,"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-73960116e3cff1d9"]},{"id":177142,"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-130fd57e8c456c6b","e-73960116e3cff1d9"]},{"id":177143,"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-130fd57e8c456c6b","e-73960116e3cff1d9"]},{"id":177144,"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-130fd57e8c456c6b"]},{"id":177145,"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-130fd57e8c456c6b"]}],"region_exact":{},"incoming_edges":[{"id":"e-130fd57e8c456c6b","operation":{"map":"A007318","operation":"basis_map"},"operation_detail":"A007318","conclusion_id":"n-47772097820bf4fe","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":"e7f4aada4734db1d36637d5514aac8944d3a96786cc08577822eddfaa7219be6","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-b9dfb234567937e9","role":"sequence","name":"basis_map_A007318 of Riordan array (1/(1-2*x), x*(1+x)/(1-2*x)).","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-fdfc0c621074efe4","operation":{"operation":"definition_equality"},"operation_detail":null,"conclusion_id":"n-47772097820bf4fe","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":"6e2ca85f2767bb8d635936ab17c4f1bbf86867bf90d7de3c323812284224934b","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[],"premises":[]},{"id":"e-73960116e3cff1d9","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"affine\",\"slope\":\"1\",\"intercept\":\"1\"}"},"operation_detail":"affine, shift 0","conclusion_id":"n-47772097820bf4fe","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":"6c45ade33750d40243618be8847f2a36247205887fd98215b12c47068dfae12a","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-b9dfb234567937e9","role":"sequence","name":"basis_map_A007318 of Riordan array (1/(1-2*x), x*(1+x)/(1-2*x)).","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":[],"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:      4,       1;\n  2:     18,       9,       1;\n  3:     80,      60,      14,      1;\n  4:    356,     356,     127,     19,      1;\n  5:   1584,    1980,     952,    219,     24,     1;\n  6:   7048,   10572,    6398,   1993,    336,    29,    1;\n  7:  31360,   54880,   40048,  15760,   3604,   478,   34,   1;\n  8: 139536,  279072,  238440, 113472,  32841,  5910,  645,  39,  1;\n  9: 620864, 1396944, 1367808, 763896, 267804, 61041, 9036, 837, 44, 1;\n","recurrence_sentence":"The row polynomials satisfy n*P(n,x) = (3*n^2-7*n+8-(n-2)*x)*P(n-1,x) - (24*n-60+(12*n-36)*x+(n-4)*x^2)*d/dx P(n-1,x) + (48+48*x+14*x^2+x^3)*d^2/dx^2 P(n-1,x) for n >= 1, with P(0,x) = 1.","mathematica":"P[0, x_] := 1;\nP[n_, x_] := P[n, x] = Expand[Together[((3*n^2 - 7*n + 8 - (n - 2)*x)*P[n - 1, x] - (24*n - 60 + (12*n - 36)*x + (n - 4)*x^2)*D[P[n - 1, x], x] + (48 + 48*x + 14*x^2 + x^3)*D[P[n - 1, x], {x, 2}])/(n)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 1; for(n = 1, N, my(i = n + 1); v[i] = ((3*n^2 - 7*n + 8 - (n - 2)*x)*v[i - 1] - (24*n - 60 + (12*n - 36)*x + (n - 4)*x^2)*deriv(v[i - 1], x) + (48 + 48*x + 14*x^2 + x^3)*deriv(deriv(v[i - 1], x), x))/(n)); 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-d5c14b9fec875ecc","steps":["x \u21a6 x+1","basis A007318"],"edges":["e-03e3acc3469b904b","e-130fd57e8c456c6b"],"text":"A121574 \u2192 x \u21a6 x+1 \u2192 basis A007318"},"headline":"A121574 \u2192 x \u21a6 x+1 \u2192 basis A007318","chain":null}
