{"id":"n-65720707fe82f0eb","revision":0,"first_index":0,"fingerprint":"f6-8bc1b8fcc230ea6a","name":"theta_plus_one_squared of basis_map_A007318 of Triangle whose (i,j)-th entry is binomial(i,j)*9^(i-j)*11^j.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":1,"degree_intercept":2,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["400","1760","1089"],["8000","52800","65340","21296"],["160000","1408000","2613600","1703680","366025"],["3200000","35200000","87120000","85184000","36602500","5797836"],["64000000","844800000","2613600000","3407360000","2196150000","695740320","86806489"],["1280000000","19712000000","73180800000","119257600000","102487000000","48701822400","12152908460","1247178944"],["25600000000","450560000000","1951488000000","3816243200000","4099480000000","2597430528000","972232676800","199548631040","17363069361"],["512000000000","10137600000000","50181120000000","114487296000000","147581280000000","116884373760000","58333960608000","17959376793600","3125352484980","235794769100"],["10240000000000","225280000000000","1254528000000000","3271065600000000","4919376000000000","4675374950400000","2916698030400000","1197291786240000","312535248498000","47158953820000","3138428376721"],["204800000000000","4956160000000000","30666240000000000","89954304000000000","154608960000000000","171430414848000000","128334713337600000","65851048243200000","22919251556520000","5187484920200000","690454242878620","41084880567984"],["4096000000000000","108134400000000000","735989760000000000","2398781440000000000","4638268800000000000","5877614223360000000","5133388533504000000","3160850315673600000","1375155093391200000","414998793616000000","82854509145434400","9860371336316160","530394395665849"],["81920000000000000","2342912000000000000","17396121600000000000","62368317440000000000","133994432000000000000","191022462259200000000","190668716958720000000","136970180345856000000","71508064856342400000","26974921585040000000","7180724125937648000","1281848273721100800","137902542873120740","6766451580210476"],["1638400000000000000","50462720000000000000","405909504000000000000","1587557171200000000000","3751844096000000000000","5942921048064000000000","6673405093555200000000","5478807213834240000000","3337043026629312000000","1510595608762240000000","502650688815635360000","119639172213969408000","19306356002236903600","1894606442458933280","85443712556229225"],["32768000000000000000","1081344000000000000000","9367142400000000000000","39688929280000000000000","102323020800000000000000","178287631441920000000000","222446836451840000000000","205455270518784000000000","143016129712684800000000","75529780438112000000000","30159041328938121600000","8972937916047705600000","1930635600223690360000","284190966368839992000","25633113766868767500","1069375531370406656"],["655360000000000000000","23068672000000000000000","214106112000000000000000","976958259200000000000000","2728613888000000000000000","5186549278310400000000000","7118298766458880000000000","7305076285112320000000000","5720645188507392000000000","3452789962885120000000000","1608482204210033152000000","574268026627053158400000","154450848017895228800000","30313703079342932480000","4101298202699002800000","342200170038530129920","13279471930572354529"]],"degrees":[2,3,4,5,6,7,8,9,10,11,12,13,14,15,16],"row_sums":["3249","147436","6251305","253104336","9908456809","378019309804","14129946105201","519438154415680","18832686997734721","674844916028966604","23940522634422216409","841935290439270480016","29383760149231848834105","1018602361344217396726156","35098733332253104576964449"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one_squared","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["400","1760","1089"]],"recurrence":{"denominator":{"coeffs":[["400","1100","484"],["0","660","484"],["0","0","121"]]},"terms":[{"coeff":{"coeffs":[["8000","39600","41140","11979"],["0","13200","21780","7986"],["0","0","2420","1331"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":194488,"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-efa20488259f353a"]},{"id":194489,"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-efa20488259f353a"]},{"id":194490,"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-efa20488259f353a"]},{"id":194491,"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-efa20488259f353a"]}],"region_exact":{},"incoming_edges":[{"id":"e-efa20488259f353a","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-65720707fe82f0eb","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":"3a7b651b0ec32fe2803866f6299959f0511f7abc88382d48b020eb2bc31e34cd","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-c02d1829f7ed6fe0","role":"sequence","name":"basis_map_A007318 of Triangle whose (i,j)-th entry is binomial(i,j)*9^(i-j)*11^j.","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:             400,             1760,              1089;\n  1:            8000,            52800,             65340,             21296;\n  2:          160000,          1408000,           2613600,           1703680,             366025;\n  3:         3200000,         35200000,          87120000,          85184000,           36602500,            5797836;\n  4:        64000000,        844800000,        2613600000,        3407360000,         2196150000,          695740320,           86806489;\n  5:      1280000000,      19712000000,       73180800000,      119257600000,       102487000000,        48701822400,        12152908460,        1247178944;\n  6:     25600000000,     450560000000,     1951488000000,     3816243200000,      4099480000000,      2597430528000,       972232676800,      199548631040,       17363069361;\n  7:    512000000000,   10137600000000,    50181120000000,   114487296000000,    147581280000000,    116884373760000,     58333960608000,    17959376793600,     3125352484980,     235794769100;\n  8:  10240000000000,  225280000000000,  1254528000000000,  3271065600000000,   4919376000000000,   4675374950400000,   2916698030400000,  1197291786240000,   312535248498000,   47158953820000,   3138428376721;\n  9: 204800000000000, 4956160000000000, 30666240000000000, 89954304000000000, 154608960000000000, 171430414848000000, 128334713337600000, 65851048243200000, 22919251556520000, 5187484920200000, 690454242878620, 41084880567984;\n","recurrence_sentence":"The row polynomials satisfy (400+(660*n+1100)*x+(121*n^2+484*n+484)*x^2)*P(n,x) = (8000+(13200*n+39600)*x+(2420*n^2+21780*n+41140)*x^2+(1331*n^2+7986*n+11979)*x^3)*P(n-1,x) for n >= 1, with P(0,x) = 400 + 1760*x + 1089*x^2.","mathematica":"P[0, x_] := 400 + 1760*x + 1089*x^2;\nP[n_, x_] := P[n, x] = Expand[Together[((8000 + (13200*n + 39600)*x + (2420*n^2 + 21780*n + 41140)*x^2 + (1331*n^2 + 7986*n + 11979)*x^3)*P[n - 1, x])/(400 + (660*n + 1100)*x + (121*n^2 + 484*n + 484)*x^2)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 400 + 1760*x + 1089*x^2; for(n = 1, N, my(i = n + 1); v[i] = ((8000 + (13200*n + 39600)*x + (2420*n^2 + 21780*n + 41140)*x^2 + (1331*n^2 + 7986*n + 11979)*x^3)*v[i - 1])/(400 + (660*n + 1100)*x + (121*n^2 + 484*n + 484)*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-cfc5b48d32898a3e","steps":["x \u21a6 x+1","(\u03b8+1)\u00b2"],"edges":["e-1af17fa5254d2e99","e-efa20488259f353a"],"text":"A038301 \u2192 x \u21a6 x+1 \u2192 (\u03b8+1)\u00b2"},"headline":"A038301 \u2192 x \u21a6 x+1 \u2192 (\u03b8+1)\u00b2","chain":null}
