{"id":"n-a35b6e0a133d5096","revision":0,"first_index":0,"fingerprint":"f6-da2813591e6631ab","name":"derivative of Triangle, read by rows of 2*n+1 terms, where row n lists the coefficients in (1+3*x+2*x^2)^n.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":2,"degree_intercept":-1,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":true,"rows":[[],["3","4"],["6","26","36","16"],["9","66","189","264","180","48"],["12","124","540","1284","1800","1488","672","128"],["15","200","1170","3940","8415","11820","10920","6400","2160","320"],["18","294","2160","9420","27090","53934","75852","75360","51840","23520","6336","768"],["21","406","3591","19236","69615","179718","340473","479248","501228","384720","210672","77952","17472","1792"],["24","536","5544","35224","153720","488040","1164408","2125832","2994192","3253600","2705472","1690752","768768","240128","46080","4096"],["27","684","8100","59544","304290","1147104","3302964","7419528","13163067","18548820","20761488","18353664","12658464","6668928","2592000","700416","117504","9216"],["30","850","11340","94680","554580","2421180","8169840","21802920","46697310","80974530","114148980","130817520","121380480","90390720","53239680","24238080","8225280","1958400","291840","20480"],["33","1034","15345","143440","947430","4701708","18196794","56270280","141290325","291139530","495513909","698734872","816344100","787783920","623890080","401212416","206160768","82621440","24879360","5294080","709632","45056"],["36","1236","20196","208956","1536480","8542776","37305576","131197176","377994276","902782980","1801650708","3019151628","4258447128","5055584688","5039923680","4198309632","2899176192","1640212992","747343872","267463680","72382464","13922304","1695744","98304"],["39","1456","25974","294684","2387385","14700972","71507436","281882744","916713369","2490756840","5704820550","11082142188","18329137047","25858331772","31117203000","31881687552","27705115152","20295557568","12421863168","6272414720","2566916352","829830144","203913216","35782656","3993600","212992"],["42","1694","32760","404404","3579030","24179610","129645516","566253688","2051943894","6251174930","16165173024","35730280404","67830220458","110933875542","156531277980","190561495488","199860321024","180033837984","138620209728","90600590080","49783878144","22696593920","8429331456","2484658176","559104000","90202112","9289728","458752"]],"degrees":[-1,1,3,5,7,9,11,13,15,17,19,21,23,25,27],"row_sums":["0","7","84","756","6048","45360","326592","2286144","15676416","105815808","705438720","4655895552","30474952704","198087192576","1279948013568"],"nonn":true,"definitions":[{"position":0,"source":"derived:derivative","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["0"],["3","4"]],"recurrence":{"denominator":{"coeffs":[["-1"],["1"]]},"terms":[{"coeff":{"coeffs":[["0","0","0"],["1","3","2"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":179666,"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-f63690695a9b626c"]},{"id":179667,"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-f63690695a9b626c"]},{"id":179668,"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-f63690695a9b626c"]}],"region_exact":{},"incoming_edges":[{"id":"e-f63690695a9b626c","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"derivative_polynomial\",\"coefficients\":[{\"numerator\":[\"0\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"derivative_polynomial, shift 0","conclusion_id":"n-a35b6e0a133d5096","premise_count":1,"theorem":"Laguerre's theorem on differential operators: if phi is a real polynomial with only real roots, then phi(D) maps every real-rooted polynomial to a real-rooted polynomial or zero (write phi(D) = C D^j prod (1 + c_i D); D preserves real-rootedness by Rolle's theorem and p + c p' is real-rooted for every real c by Rolle's theorem applied to e^(x/c) p; Polya--Schur 1914); when the coefficients of phi have one sign, coefficients of one sign stay of one sign; applied to phi(n, .) for each n","lean_route":null,"lean_declarations":["RealRooted.splits_add_C_mul_derivative_all","RealRooted.splits_C_mul_add_derivative","Polynomial.Splits.derivative"],"certificate_hash":"f6b354b9132f910d89fde99980ab64c7c756e6b0a700c1e8c9f57d7a591b8022","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-eed4f744ce063213","role":"sequence","name":"Triangle, read by rows of 2*n+1 terms, where row n lists the coefficients in (1+3*x+2*x^2)^n.","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:  0;\n  1:  3,   4;\n  2:  6,  26,   36,    16;\n  3:  9,  66,  189,   264,    180,      48;\n  4: 12, 124,  540,  1284,   1800,    1488,     672,     128;\n  5: 15, 200, 1170,  3940,   8415,   11820,   10920,    6400,     2160,      320;\n  6: 18, 294, 2160,  9420,  27090,   53934,   75852,   75360,    51840,    23520,     6336,      768;\n  7: 21, 406, 3591, 19236,  69615,  179718,  340473,  479248,   501228,   384720,   210672,    77952,    17472,    1792;\n  8: 24, 536, 5544, 35224, 153720,  488040, 1164408, 2125832,  2994192,  3253600,  2705472,  1690752,   768768,  240128,   46080,   4096;\n  9: 27, 684, 8100, 59544, 304290, 1147104, 3302964, 7419528, 13163067, 18548820, 20761488, 18353664, 12658464, 6668928, 2592000, 700416, 117504, 9216;\n","recurrence_sentence":"The row polynomials satisfy (n-1)*P(n,x) = (n+3*n*x+2*n*x^2)*P(n-1,x) for n >= 2, with P(0,x) = 0, P(1,x) = 3 + 4*x.","mathematica":"P[0, x_] := 0;\nP[1, x_] := 3 + 4*x;\nP[n_, x_] := P[n, x] = Expand[Together[((n + 3*n*x + 2*n*x^2)*P[n - 1, x])/(n - 1)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 0; v[2] = 3 + 4*x; for(n = 2, N, my(i = n + 1); v[i] = ((n + 3*n*x + 2*n*x^2)*v[i - 1])/(n - 1)); 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-eed4f744ce063213","steps":["D"],"edges":["e-f63690695a9b626c"],"text":"A200536 \u2192 D"},"headline":"A200536 \u2192 D","chain":null}
