{"id":"n-7c063951a060c5eb","revision":0,"first_index":0,"fingerprint":"f6-0c4d03a739c9a724","name":"theta_plus_one of basis_map_A013611 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":true,"rows":[["400","3520","5808"],["8000","105600","348480","340736"],["160000","2816000","13939200","27258880","18740480"],["3200000","70400000","464640000","1362944000","1874048000","989497344"],["64000000","1689600000","13939200000","54517760000","112442880000","118739681280","50794196992"],["1280000000","39424000000","390297600000","1908121600000","5247334400000","8311777689600","7111187578880","2554222477312"],["25600000000","901120000000","10407936000000","61059891200000","209893376000000","443294810112000","568895006310400","408675596369920","126434012626944"],["512000000000","20275200000000","267632640000000","1831796736000000","7556161536000000","19948266455040000","34133700378624000","36780803673292800","22758122272849920","6181218395095040"],["10240000000000","450560000000000","6690816000000000","52337049600000000","251872051200000000","797930658201600000","1706685018931200000","2452053578219520000","2275812227284992000","1236243679019008000","299170970322599936"],["204800000000000","9912320000000000","163553280000000000","1439268864000000000","7915978752000000000","29257457467392000000","75094140832972800000","134862946802073600000","166892896667566080000","135986804692090880000","65817613470971985920","14360206575484796928"],["4096000000000000","216268800000000000","3925278720000000000","38380503040000000000","237479362560000000000","1003112827453440000000","3003765633318912000000","6473421446499532800000","10013573800053964800000","10878944375367270400000","7898113616516638310400","3446449578116351262720","684503180098108653568"],["81920000000000000","4685824000000000000","92779315200000000000","997893079040000000000","6860514918400000000000","32601166892236800000000","111568437808988160000000","280514929348313088000000","520705837602806169600000","707131384398872576000000","684503180098108653568000","448038445155125664153600","177970826825508249927680","32434919918494994661376"],["1638400000000000000","100925440000000000000","2164850688000000000000","25400914739200000000000","192094417715200000000000","1014258525536256000000000","3904895323314585600000000","11220597173932523520000000","24299605754797621248000000","39599357526336864256000000","47915222606867605749760000","41816921547811728654336000","24915915755571154989875200","9081777577178598505185280","1529074796157621176893440"],["32768000000000000000","2162688000000000000000","49958092800000000000000","635022868480000000000000","5238938664960000000000000","30427755766087680000000000","130163177443819520000000000","420772394022469632000000000","1041411675205612339200000000","1979967876316843212800000000","2874913356412056344985600000","3136269116085879649075200000","2491591575557115498987520000","1362266636576789775777792000","458722438847286353068032000","71764577099664353902198784"],["655360000000000000000","46137344000000000000000","1141899264000000000000000","15631332147200000000000000","139705031065600000000000000","885171076831641600000000000","4165221678202224640000000000","14960796231910031360000000000","41656467008224493568000000000","90512817203055689728000000000","153328712341976338399232000000","200721223429496297540812800000","199327326044569239919001600000","145308441234857576082964480000","73395590215565816490885120000","22964664671892593248703610880","3354993979409308544927793152"]],"degrees":[2,3,4,5,6,7,8,9,10,11,12,13,14,15,16],"row_sums":["9728","802816","62914560","4764729344","352187318272","25563645345792","1829587348619264","129478489286901760","9079256848778919936","631800984524552142848","43681889966544218226688","3003425083105094355910656","205517389334486959700049920","14004196694415864359796342784","950737950171172051122527404032"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["400","3520","5808"]],"recurrence":{"denominator":{"coeffs":[["5","22"],["0","11"]]},"terms":[{"coeff":{"coeffs":[["100","880","1452"],["0","220","484"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":195156,"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-1600b593bf39ef5e"]},{"id":195157,"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-1600b593bf39ef5e"]},{"id":195158,"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-1600b593bf39ef5e"]},{"id":195159,"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-1600b593bf39ef5e"]}],"region_exact":{},"incoming_edges":[{"id":"e-1600b593bf39ef5e","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"euler_polynomial\",\"coefficients\":[{\"numerator\":[\"1\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"euler_polynomial, shift 0","conclusion_id":"n-7c063951a060c5eb","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":"3201826ec0959858febaed5a063a85d49d74d7ab7b718018a176de863945d290","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-586959989bac3453","role":"sequence","name":"basis_map_A013611 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,             3520,               5808;\n  1:            8000,           105600,             348480,              340736;\n  2:          160000,          2816000,           13939200,            27258880,            18740480;\n  3:         3200000,         70400000,          464640000,          1362944000,          1874048000,            989497344;\n  4:        64000000,       1689600000,        13939200000,         54517760000,        112442880000,         118739681280,          50794196992;\n  5:      1280000000,      39424000000,       390297600000,       1908121600000,       5247334400000,        8311777689600,        7111187578880,         2554222477312;\n  6:     25600000000,     901120000000,     10407936000000,      61059891200000,     209893376000000,      443294810112000,      568895006310400,       408675596369920,       126434012626944;\n  7:    512000000000,   20275200000000,    267632640000000,    1831796736000000,    7556161536000000,    19948266455040000,    34133700378624000,     36780803673292800,     22758122272849920,      6181218395095040;\n  8:  10240000000000,  450560000000000,   6690816000000000,   52337049600000000,  251872051200000000,   797930658201600000,  1706685018931200000,   2452053578219520000,   2275812227284992000,   1236243679019008000,   299170970322599936;\n  9: 204800000000000, 9912320000000000, 163553280000000000, 1439268864000000000, 7915978752000000000, 29257457467392000000, 75094140832972800000, 134862946802073600000, 166892896667566080000, 135986804692090880000, 65817613470971985920, 14360206575484796928;\n","recurrence_sentence":"The row polynomials satisfy (5+(11*n+22)*x)*P(n,x) = (100+(220*n+880)*x+(484*n+1452)*x^2)*P(n-1,x) for n >= 1, with P(0,x) = 400 + 3520*x + 5808*x^2.","mathematica":"P[0, x_] := 400 + 3520*x + 5808*x^2;\nP[n_, x_] := P[n, x] = Expand[Together[((100 + (220*n + 880)*x + (484*n + 1452)*x^2)*P[n - 1, x])/(5 + (11*n + 22)*x)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 400 + 3520*x + 5808*x^2; for(n = 1, N, my(i = n + 1); v[i] = ((100 + (220*n + 880)*x + (484*n + 1452)*x^2)*v[i - 1])/(5 + (11*n + 22)*x)); 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":["basis A013611","\u03b8+1"],"edges":["e-9ac6ce8d07a161c9","e-1600b593bf39ef5e"],"text":"A038301 \u2192 basis A013611 \u2192 \u03b8+1"},"headline":"A038301 \u2192 basis A013611 \u2192 \u03b8+1","chain":null}
