{"id":"n-2793b6a4aab90b67","revision":0,"first_index":1,"fingerprint":"f6-fffff3ff3ecdc6fc","name":"theta_plus_one_squared of Triangle read by rows: T(n,k) = (4n-4k+1) * T(n-1,k-1) + (4k-3) * T(n-1,k).","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":1,"degree_intercept":-1,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["1"],["1","4"],["1","40","9"],["1","236","531","16"],["1","1232","9558","4928","25"],["1","6228","122058","216992","38925","36"],["1","31224","1336743","5641792","3713175","281016","49"],["1","156220","13506021","113742640","177722875","54024084","1913695","64"],["1","781216","130341564","1982879104","6042577750","4461477984","709637404","12499456","81"],["1","3906212","1224048420","31570386752","167787042350","241613340984","96684309428","8704344320","79100793","100"],["1","19531208","11306472021","473521524096","4085597952450","10147760321328","8007771986802","1894086096384","101758248189","488280200","121"],["1","97656204","103384221255","6819092838480","90911609252250","360184493036088","490251115521342","232733719685760","34521657494805","1148713569500","2954100171","144"],["1","488281200","939466776114","95448591231680","1897106831772375","11360343156131808","24512555776067100","20196165610900992","6146626134942495","596553695198000","12630608878866","17578123200","169"],["1","2441406196","8504639456526","1309308375470816","37768937820711875","328717722924591228","1061231883981213588","1386098787240768768","739614876580330263","151075751282847500","9901644589498046","136074231304416","103149411781","196"],["1","12207031192","76810920141843","17701380037642688","725949510755701025","8915401188503944488","41295701487559895691","80393729659964588544","68264322867190847979","24765003301399845800","3513595632057592961","159312420338784192","1442338389330163","598144528408","225"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","5","50","784","15744","384240","11004000","361065600","13340194560","547666479360","24722310412800","1216676837376000","64818387938304000","3715863597257011200","228052237207469875200"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one_squared","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":1,"initial_polynomials":[["1"],["1","4"]],"recurrence":{"denominator":{"coeffs":[["49"],["-56"],["16"]]},"terms":[{"coeff":{"coeffs":[["63","-1188","18865"],["-120","-1328","-47824"],["48","1344","43232"],["0","-256","-16640"],["0","0","2304"]]},"deriv_order":0,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["0","72","-652","18620"],["0","320","-848","-43232"],["0","-128","-64","34304"],["0","0","256","-10752"],["0","0","0","1024"]]},"deriv_order":1,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["0","0","-144","-2992","3136"],["0","0","640","6080","-6720"],["0","0","-256","-4352","4608"],["0","0","0","1024","-1024"]]},"deriv_order":2,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["-14","-1372"],["64","2352"],["-32","-1344"],["0","256"]]},"deriv_order":0,"offset":1,"sign":"none"},{"coeff":{"coeffs":[["0","232","588"],["0","-384","-1456"],["0","128","1088"],["0","0","-256"]]},"deriv_order":1,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":187543,"position":0,"claim":"real_rooted","from_index":1,"region_key":"(-inf, 0]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},"label":"Real-rooted","description":"Every row P_n, n >= 1, is zero or real-rooted with all roots in (-inf, 0]","region_exact":null,"edges":["e-4a78105f4132bfce"]},{"id":187544,"position":1,"claim":"one_signed_coefficients","from_index":1,"region_key":null,"provenance":"derived_from_edges","claim_data":{"alternating":false,"claim":"one_signed_coefficients","from_index":1},"label":"Coefficients of one sign","description":"Every nonzero row, n >= 1: the coefficients of P_n have one sign","region_exact":null,"edges":["e-4a78105f4132bfce"]},{"id":187545,"position":2,"claim":"hadamard_kernel","from_index":1,"region_key":null,"provenance":"derived_from_edges","claim_data":{"claim":"hadamard_kernel","from_index":1},"label":"Hadamard kernel (Malo)","description":"Rows P_n, n >= 1, are Hadamard kernels (preserve real-rootedness)","region_exact":null,"edges":["e-4a78105f4132bfce"]},{"id":187546,"position":3,"claim":"interlacing","from_index":2,"region_key":null,"provenance":"edges","claim_data":{"claim":"interlacing","from_index":2,"kind":"weak","orientation":"unordered"},"label":"Interlacing of consecutive rows","description":"Rows P_(m-1), P_m interlace (weak, unordered) for every m >= 2","region_exact":null,"edges":["e-4a78105f4132bfce"]}],"region_exact":{},"incoming_edges":[{"id":"e-4a78105f4132bfce","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-2793b6a4aab90b67","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":"faa484cefef096a249b07beb99d2aa7f93f23482dae58ab82b969a0bcb0ce14d","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},{"claim":"interlacing","from_index":2,"kind":"weak","orientation":"unordered"}],"premises":[{"position":0,"node_id":"n-d023ddeb9da11712","role":"sequence","name":"Triangle read by rows: T(n,k) = (4n-4k+1) * T(n-1,k-1) + (4k-3) * T(n-1,k).","uses":{"claim":"real_rooted","from_index":1,"region":{"upper":{"closed":true,"value":"0"}}},"uses_text":"Every row P_n, n >= 1, is zero or real-rooted with all roots in (-inf, 0]"}]}],"used_by":[],"used_by_total":0,"links":[{"id":"l-8e490b7057ebe506","kind":"fingerprint_related","node_a_id":"n-2793b6a4aab90b67","node_b_id":"n-f1477600e3507b5d","fingerprint":"f6-fffff3ff3ecdc6fc","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-fffff3ff3ecdc6fc"},"other_id":"n-f1477600e3507b5d","other":{"id":"n-f1477600e3507b5d","name":"theta_plus_one_squared of Triangle read by rows: T(n,k) = t(n-k, k); t(n,m) = f(m)*t(n-1,m) + f(n)*t(n,m-1), where f(x) = 8*x + 2.","first_index":0,"fingerprint":"f6-fffff3ff3ecdc6fc","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["1"],["2","8"],["4","160","36"]],"card_rows":[["1"],["2","8"],["4","160","36"],["8","1888","4248","128"]],"row_sums_preview":["1","10","200","6272","251904","12295680","704256000","46216396800"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-fb16da45c5e69d3d","steps":["(\u03b8+1)\u00b2"],"edges":["e-78d4582aa95b09c2"],"text":"A257618 \u2192 (\u03b8+1)\u00b2"},"headline":"A257618 \u2192 (\u03b8+1)\u00b2","chain":null}}],"oeis":[],"bfiles":[],"oeis_texts":[{"oeis_id":"","target":"node","first_row":1,"oeis_offset":1,"reversed":false,"trim_zeros":"none","regular_triangle":false,"rows_shown":10,"polytool_commit":"c48629374597092cc41ef4d6273f37991516f984","triangle_example":"Triangle begins:\n   1: 1;\n   2: 1,       4;\n   3: 1,      40,          9;\n   4: 1,     236,        531,          16;\n   5: 1,    1232,       9558,        4928,           25;\n   6: 1,    6228,     122058,      216992,        38925,           36;\n   7: 1,   31224,    1336743,     5641792,      3713175,       281016,          49;\n   8: 1,  156220,   13506021,   113742640,    177722875,     54024084,     1913695,         64;\n   9: 1,  781216,  130341564,  1982879104,   6042577750,   4461477984,   709637404,   12499456,       81;\n  10: 1, 3906212, 1224048420, 31570386752, 167787042350, 241613340984, 96684309428, 8704344320, 79100793, 100;\n","recurrence_sentence":"The row polynomials satisfy (16*n^2-56*n+49)*P(n,x) = (48*n^2-120*n+63-(256*n^3-1344*n^2+1328*n+1188)*x+(2304*n^4-16640*n^3+43232*n^2-47824*n+18865)*x^2)*P(n-2,x) - ((128*n^2-320*n-72)*x-(256*n^3-64*n^2-848*n-652)*x^2-(1024*n^4-10752*n^3+34304*n^2-43232*n+18620)*x^3)*d/dx P(n-2,x) - ((256*n^2-640*n+144)*x^2-(1024*n^3-4352*n^2+6080*n-2992)*x^3+(1024*n^3-4608*n^2+6720*n-3136)*x^4)*d^2/dx^2 P(n-2,x) - (32*n^2-64*n+14-(256*n^3-1344*n^2+2352*n-1372)*x)*P(n-1,x) + ((128*n^2-384*n+232)*x-(256*n^3-1088*n^2+1456*n-588)*x^2)*d/dx P(n-1,x) for n >= 3, with P(1,x) = 1, P(2,x) = 1 + 4*x.","mathematica":"P[1, x_] := 1;\nP[2, x_] := 1 + 4*x;\nP[n_, x_] := P[n, x] = Expand[Together[((48*n^2 - 120*n + 63 - (256*n^3 - 1344*n^2 + 1328*n + 1188)*x + (2304*n^4 - 16640*n^3 + 43232*n^2 - 47824*n + 18865)*x^2)*P[n - 2, x] - ((128*n^2 - 320*n - 72)*x - (256*n^3 - 64*n^2 - 848*n - 652)*x^2 - (1024*n^4 - 10752*n^3 + 34304*n^2 - 43232*n + 18620)*x^3)*D[P[n - 2, x], x] - ((256*n^2 - 640*n + 144)*x^2 - (1024*n^3 - 4352*n^2 + 6080*n - 2992)*x^3 + (1024*n^3 - 4608*n^2 + 6720*n - 3136)*x^4)*D[P[n - 2, x], {x, 2}] - (32*n^2 - 64*n + 14 - (256*n^3 - 1344*n^2 + 2352*n - 1372)*x)*P[n - 1, x] + ((128*n^2 - 384*n + 232)*x - (256*n^3 - 1088*n^2 + 1456*n - 588)*x^2)*D[P[n - 1, x], x])/(16*n^2 - 56*n + 49)]];\nTable[CoefficientList[P[n, x], x], {n, 1, 10}] // Flatten","pari":"P(N) = {my(v = vector(N)); v[1] = 1; v[2] = 1 + 4*x; for(n = 3, N, my(i = n); v[i] = ((48*n^2 - 120*n + 63 - (256*n^3 - 1344*n^2 + 1328*n + 1188)*x + (2304*n^4 - 16640*n^3 + 43232*n^2 - 47824*n + 18865)*x^2)*v[i - 2] - ((128*n^2 - 320*n - 72)*x - (256*n^3 - 64*n^2 - 848*n - 652)*x^2 - (1024*n^4 - 10752*n^3 + 34304*n^2 - 43232*n + 18620)*x^3)*deriv(v[i - 2], x) - ((256*n^2 - 640*n + 144)*x^2 - (1024*n^3 - 4352*n^2 + 6080*n - 2992)*x^3 + (1024*n^3 - 4608*n^2 + 6720*n - 3136)*x^4)*deriv(deriv(v[i - 2], x), x) - (32*n^2 - 64*n + 14 - (256*n^3 - 1344*n^2 + 2352*n - 1372)*x)*v[i - 1] + ((128*n^2 - 384*n + 232)*x - (256*n^3 - 1088*n^2 + 1456*n - 588)*x^2)*deriv(v[i - 1], x))/(16*n^2 - 56*n + 49)); v};\nrow(n, p) = {my(c = Vecrev(p)); c};\nT(N) = {my(v = P(N)); concat(vector(#v, i, row(i, v[i])))};\nT(10)","reading":{"first_row":1,"offset":1,"reversed":false,"trim_zeros":"none","regular_triangle":false}}],"derivation":{"root":"n-d023ddeb9da11712","steps":["(\u03b8+1)\u00b2"],"edges":["e-4a78105f4132bfce"],"text":"A142459 \u2192 (\u03b8+1)\u00b2"},"headline":"A142459 \u2192 (\u03b8+1)\u00b2","chain":null}