{"id":"n-e82344c5ef80ab5d","revision":0,"first_index":0,"fingerprint":"f6-c6176a18b14d9443","name":"mobius_x_over_x_plus_one of basis_map_A013609 of Triangular array: row n gives the coefficients of the polynomial p(n,x) defined in Comments.","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","10"],["10","44","46"],["28","180","372","244"],["76","640","1968","2608","1252"],["208","2168","8848","17632","17120","6472"],["568","7056","35880","95456","139944","107088","33400"],["1552","22384","136272","453488","890096","1029648","649648","172432"],["4240","69632","493696","1972352","4852960","7526144","7181056","3853184","890128"],["11584","213408","1726848","8050944","23821056","46365120","59343744","48150528","22470336","4595104"],["31648","646336","5877216","31321344","108292800","253724544","407836992","443987712","313234848","129311680","23721184"],["86464","1938752","19570240","117348672","464281728","1272224640","2463106944","3368565120","3188627904","1989418816","736271936","122455360"],["236224","5769216","64010496","426516736","1900377792","5963295744","13510339584","22262576640","26476909632","22161777664","12391564032","4155638016","632148544"],["645376","17052544","206267136","1511967232","7491596800","26490897792","68763563520","132641845248","190108544256","199930445440","149949900544","75949131264","23284123648","3263326336"],["1763200","50114816","656336512","5248735744","28628014976","112636897024","329620030080","728725588992","1222900939392","1550009360128","1460560390016","992112318976","459223557760","129654163712","16846196608"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","14","100","824","6544","52448","419392","3355520","26843392","214748672","1717986304","13743896576","109951160320","879609307136","7036874407936"],"nonn":true,"definitions":[{"position":0,"source":"derived:mobius_x_over_x_plus_one","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"],["4","10"]],"recurrence":{"denominator":{"coeffs":[["-1","-3","-3","-1"],["1","3","3","1"]]},"terms":[{"coeff":{"coeffs":[["14","122","410","698","644","308","60"],["-26","-206","-656","-1082","-980","-464","-90"],["12","84","246","384","336","156","30"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["21","207","838","1822","2313","1723","700","120"],["-12","-114","-448","-952","-1188","-874","-352","-60"]]},"deriv_order":1,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["3","36","181","500","835","868","551","196","30"]]},"deriv_order":2,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":178841,"position":0,"claim":"real_rooted","from_index":0,"region_key":"[-1, 0]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":0,"region":{"lower":{"closed":true,"value":"-1"},"upper":{"closed":true,"value":"0"}}},"label":"Real-rooted","description":"Every row P_n, n >= 0, is zero or real-rooted with all roots in [-1, 0]","region_exact":null,"edges":["e-517af0e4f4510849"]},{"id":178842,"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-517af0e4f4510849"]},{"id":178843,"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-517af0e4f4510849"]}],"region_exact":{},"incoming_edges":[{"id":"e-517af0e4f4510849","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"mobius\",\"a\":\"1\",\"b\":\"0\",\"c\":\"1\",\"e\":\"1\",\"schedule\":{\"first_index\":0,\"first_degree\":0,\"step\":1}}"},"operation_detail":"mobius, shift 0","conclusion_id":"n-e82344c5ef80ab5d","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":"fTransform","lean_declarations":["RealRooted.splits_fPolynomial"],"certificate_hash":"2e5c9916191d57e774d1f40c6b3a04e05fd3aee7a3ae0aaf10e8edb5838f413a","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"lower":{"closed":true,"value":"-1"},"upper":{"closed":true,"value":"0"}}}],"premises":[{"position":0,"node_id":"n-096818d27dad5765","role":"sequence","name":"basis_map_A013609 of Triangular array: row n gives the coefficients of the polynomial p(n,x) defined in Comments.","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,     10;\n  2:    10,     44,      46;\n  3:    28,    180,     372,     244;\n  4:    76,    640,    1968,    2608,     1252;\n  5:   208,   2168,    8848,   17632,    17120,     6472;\n  6:   568,   7056,   35880,   95456,   139944,   107088,    33400;\n  7:  1552,  22384,  136272,  453488,   890096,  1029648,   649648,   172432;\n  8:  4240,  69632,  493696, 1972352,  4852960,  7526144,  7181056,  3853184,   890128;\n  9: 11584, 213408, 1726848, 8050944, 23821056, 46365120, 59343744, 48150528, 22470336, 4595104;\n","recurrence_sentence":"The row polynomials satisfy (n-1+(3*n-3)*x+(3*n-3)*x^2+(n-1)*x^3)*P(n,x) = (12*n^2-26*n+14+(84*n^2-206*n+122)*x+(246*n^2-656*n+410)*x^2+(384*n^2-1082*n+698)*x^3+(336*n^2-980*n+644)*x^4+(156*n^2-464*n+308)*x^5+(30*n^2-90*n+60)*x^6)*P(n-1,x) - (12*n-21+(114*n-207)*x+(448*n-838)*x^2+(952*n-1822)*x^3+(1188*n-2313)*x^4+(874*n-1723)*x^5+(352*n-700)*x^6+(60*n-120)*x^7)*d/dx P(n-1,x) + (3+36*x+181*x^2+500*x^3+835*x^4+868*x^5+551*x^6+196*x^7+30*x^8)*d^2/dx^2 P(n-1,x) for n >= 2, with P(0,x) = 1, P(1,x) = 4 + 10*x.","mathematica":"P[0, x_] := 1;\nP[1, x_] := 4 + 10*x;\nP[n_, x_] := P[n, x] = Expand[Together[((12*n^2 - 26*n + 14 + (84*n^2 - 206*n + 122)*x + (246*n^2 - 656*n + 410)*x^2 + (384*n^2 - 1082*n + 698)*x^3 + (336*n^2 - 980*n + 644)*x^4 + (156*n^2 - 464*n + 308)*x^5 + (30*n^2 - 90*n + 60)*x^6)*P[n - 1, x] - (12*n - 21 + (114*n - 207)*x + (448*n - 838)*x^2 + (952*n - 1822)*x^3 + (1188*n - 2313)*x^4 + (874*n - 1723)*x^5 + (352*n - 700)*x^6 + (60*n - 120)*x^7)*D[P[n - 1, x], x] + (3 + 36*x + 181*x^2 + 500*x^3 + 835*x^4 + 868*x^5 + 551*x^6 + 196*x^7 + 30*x^8)*D[P[n - 1, x], {x, 2}])/(n - 1 + (3*n - 3)*x + (3*n - 3)*x^2 + (n - 1)*x^3)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 1; v[2] = 4 + 10*x; for(n = 2, N, my(i = n + 1); v[i] = ((12*n^2 - 26*n + 14 + (84*n^2 - 206*n + 122)*x + (246*n^2 - 656*n + 410)*x^2 + (384*n^2 - 1082*n + 698)*x^3 + (336*n^2 - 980*n + 644)*x^4 + (156*n^2 - 464*n + 308)*x^5 + (30*n^2 - 90*n + 60)*x^6)*v[i - 1] - (12*n - 21 + (114*n - 207)*x + (448*n - 838)*x^2 + (952*n - 1822)*x^3 + (1188*n - 2313)*x^4 + (874*n - 1723)*x^5 + (352*n - 700)*x^6 + (60*n - 120)*x^7)*deriv(v[i - 1], x) + (3 + 36*x + 181*x^2 + 500*x^3 + 835*x^4 + 868*x^5 + 551*x^6 + 196*x^7 + 30*x^8)*deriv(deriv(v[i - 1], x), x))/(n - 1 + (3*n - 3)*x + (3*n - 3)*x^2 + (n - 1)*x^3)); 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-eac80c2bf8e566f5","steps":["basis A013609","x \u21a6 x/(x+1)"],"edges":["e-509e22279eb55844","e-517af0e4f4510849"],"text":"A249250 \u2192 basis A013609 \u2192 x \u21a6 x/(x+1)"},"headline":"A249250 \u2192 basis A013609 \u2192 x \u21a6 x/(x+1)","chain":null}