{"id":"n-71be7c5970f096b1","revision":0,"first_index":0,"fingerprint":"f6-7f34919e5b06c424","name":"theta_plus_one_squared of basis_map_A007318 of Triangle of coefficients in expansion of (1+4x)^n.","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"],["5","16"],["25","160","144"],["125","1200","2160","1024"],["625","8000","21600","20480","6400"],["3125","50000","180000","256000","160000","36864"],["15625","300000","1350000","2560000","2400000","1105920","200704"],["78125","1750000","9450000","22400000","28000000","19353600","7024640","1048576"],["390625","10000000","63000000","179200000","280000000","258048000","140492800","41943040","5308416"],["1953125","56250000","405000000","1344000000","2520000000","2903040000","2107392000","943718400","238878720","26214400"],["9765625","312500000","2531250000","9600000000","21000000000","29030400000","26342400000","15728640000","5971968000","1310720000","126877696"],["48828125","1718750000","15468750000","66000000000","165000000000","266112000000","289766400000","216268800000","109486080000","36044800000","6978273280","603979776"],["244140625","9375000000","92812500000","440000000000","1237500000000","2280960000000","2897664000000","2595225600000","1642291200000","720896000000","209348198400","36238786560","2835349504"],["1220703125","50781250000","548437500000","2860000000000","8937500000000","18532800000000","26906880000000","28114944000000","21349785600000","11714560000000","4535877632000","1177760563200","184297717760","13153337344"],["6103515625","273437500000","3199218750000","18200000000000","62562500000000","144144000000000","235435200000000","281149440000000","249080832000000","164003840000000","79377858560000","27481079808000","6450420121600","920733614080","60397977600"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","21","329","4509","57105","685989","7932249","89104941","978382881","10546446645","111964521321","1173496661181","12165390775089","124927998303429","1272345061846905"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one_squared","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"]],"recurrence":{"denominator":{"coeffs":[["25","-20","0"],["0","60","0"],["0","0","16"]]},"terms":[{"coeff":{"coeffs":[["125","300","240","64"],["0","300","400","128"],["0","0","80","64"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":184484,"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-37d927a7a182dbd7"]},{"id":184485,"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-37d927a7a182dbd7"]},{"id":184486,"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-37d927a7a182dbd7"]},{"id":184487,"position":3,"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-37d927a7a182dbd7"]}],"region_exact":{},"incoming_edges":[{"id":"e-37d927a7a182dbd7","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"euler_polynomial\",\"coefficients\":[{\"numerator\":[\"1\"],\"denominator\":[\"1\"]},{\"numerator\":[\"2\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"euler_polynomial, shift 0","conclusion_id":"n-71be7c5970f096b1","premise_count":1,"theorem":"Laguerre's theorem on multiplier sequences: if f is a real polynomial whose roots are all real and <= 0, then (f(k))_(k >= 0) is a multiplier sequence, so x^k -> f(k) x^k maps every real-rooted polynomial to a real-rooted polynomial or zero (Laguerre; see T. Craven and G. Csordas, Multiplier sequences for fields, Illinois J. Math. 21 (1977); Polya--Schur, Theorem 40 of P. Branden, arXiv:1410.6601: sum_k f(k) x^k / k! = f(theta) e^x = C e^x x^m prod (1 + x/a_j), a_j > 0); f(k) has one sign for k >= 0, so coefficients of one sign stay of one sign; applied to f(n, .) for each n","lean_route":null,"lean_declarations":["RealRooted.isMultiplierSequence_eval_of_roots_nonpos","RealRooted.isPFMultiplierSequence_eval_of_roots_nonpos","RealRooted.isMultiplierSequence_iff_preserves"],"certificate_hash":"592a75ade34e0aaf2bde756c3cde22fb53fb182d29cebf9c9f3c995341701241","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-d04994959b21388c","role":"sequence","name":"basis_map_A007318 of Triangle of coefficients in expansion of (1+4x)^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":[{"id":"l-0811e9d756f5f785","kind":"fingerprint_related","node_a_id":"n-71be7c5970f096b1","node_b_id":"n-e782416b20ea362c","fingerprint":"f6-7f34919e5b06c424","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-7f34919e5b06c424"},"other_id":"n-e782416b20ea362c","other":{"id":"n-e782416b20ea362c","name":"theta_plus_one_squared of basis_map_A013611 of Triangle whose (i,j)-th entry is binomial(i,j)*12^(i-j)*3^j.","first_index":0,"fingerprint":"f6-7f34919e5b06c424","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["225","1440","1296"],["3375","32400","58320","27648"],["50625","648000","1749600","1658880","518400"]],"card_rows":[["225","1440","1296"],["3375","32400","58320","27648"],["50625","648000","1749600","1658880","518400"],["759375","12150000","43740000","62208000","38880000","8957952"]],"row_sums_preview":["2961","121743","4625505","166695327","5782609521","194872505967","6419170082241","207585709313535"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-615df6ea54d3bbef","steps":["basis A013611","(\u03b8+1)\u00b2"],"edges":["e-a5d7492b5780a0c3","e-03698b142e87b517"],"text":"A038329 \u2192 basis A013611 \u2192 (\u03b8+1)\u00b2"},"headline":"A038329 \u2192 basis A013611 \u2192 (\u03b8+1)\u00b2","chain":null}},{"id":"l-d9c7aad059ef8f94","kind":"fingerprint_related","node_a_id":"n-71be7c5970f096b1","node_b_id":"n-d85cea0fb7505d23","fingerprint":"f6-7f34919e5b06c424","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-7f34919e5b06c424"},"other_id":"n-d85cea0fb7505d23","other":{"id":"n-d85cea0fb7505d23","name":"theta_plus_one_squared of basis_map_A013609 of Triangle whose (i,j)-th entry is binomial(i,j)*12^(i-j)*8^j.","first_index":0,"fingerprint":"f6-7f34919e5b06c424","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["400","2560","2304"],["8000","76800","138240","65536"],["160000","2048000","5529600","5242880","1638400"]],"card_rows":[["400","2560","2304"],["8000","76800","138240","65536"],["160000","2048000","5529600","5242880","1638400"],["3200000","51200000","184320000","262144000","163840000","37748736"]],"row_sums_preview":["5264","288576","14618880","702452736","32490491904","1459895353344","64119300489216","2764687709306880"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-6874f381e9c7e0a2","steps":["basis A013609","(\u03b8+1)\u00b2"],"edges":["e-4eca5e8e987e069c","e-fc2dc75a36e0f895"],"text":"A038334 \u2192 basis A013609 \u2192 (\u03b8+1)\u00b2"},"headline":"A038334 \u2192 basis A013609 \u2192 (\u03b8+1)\u00b2","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:       5,       16;\n  2:      25,      160,       144;\n  3:     125,     1200,      2160,       1024;\n  4:     625,     8000,     21600,      20480,       6400;\n  5:    3125,    50000,    180000,     256000,     160000,      36864;\n  6:   15625,   300000,   1350000,    2560000,    2400000,    1105920,     200704;\n  7:   78125,  1750000,   9450000,   22400000,   28000000,   19353600,    7024640,   1048576;\n  8:  390625, 10000000,  63000000,  179200000,  280000000,  258048000,  140492800,  41943040,   5308416;\n  9: 1953125, 56250000, 405000000, 1344000000, 2520000000, 2903040000, 2107392000, 943718400, 238878720, 26214400;\n","recurrence_sentence":"The row polynomials satisfy (25+(60*n-20)*x+16*n^2*x^2)*P(n,x) = (125+(300*n+300)*x+(80*n^2+400*n+240)*x^2+(64*n^2+128*n+64)*x^3)*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[((125 + (300*n + 300)*x + (80*n^2 + 400*n + 240)*x^2 + (64*n^2 + 128*n + 64)*x^3)*P[n - 1, x])/(25 + (60*n - 20)*x + 16*n^2*x^2)]];\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] = ((125 + (300*n + 300)*x + (80*n^2 + 400*n + 240)*x^2 + (64*n^2 + 128*n + 64)*x^3)*v[i - 1])/(25 + (60*n - 20)*x + 16*n^2*x^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-2e0409c0014ec240","steps":["basis A007318","(\u03b8+1)\u00b2"],"edges":["e-13c78408b476aecd","e-37d927a7a182dbd7"],"text":"A013611 \u2192 basis A007318 \u2192 (\u03b8+1)\u00b2"},"headline":"A013611 \u2192 basis A007318 \u2192 (\u03b8+1)\u00b2","chain":null}
