{"id":"n-7be2caa1a4f05535","revision":0,"first_index":0,"fingerprint":"f6-43273b91a08d4b48","name":"shift_x_plus_one of basis_map_A013610 of Coefficients of raising factorial polynomials, T(n,k) = [x^k] p(x, n) where p(x, n) = (m*x + n - 1)*p(x, n - 1) with p[x, 0] = 1, p[x, -1] = 0, p[x, 1] = m*x and m = 2. Triangle read by rows, for n >= 0 and 0 <= k <= 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":true,"rows":[["1"],["8","6"],["72","102","36"],["720","1452","972","216"],["7920","20292","19404","8208","1296"],["95040","291024","354600","214920","64800","7776"],["1235520","4353552","6355944","4921560","2131920","489888","46656"],["17297280","68362848","115104528","107037504","59376240","19649952","3592512","279936"],["259459200","1129226400","2136745008","2296189728","1532868624","651006720","171787392","25754112","1679616"],["4151347200","19624377600","40963278528","49559505696","38303036352","19613319264","6654638592","1442790144","181398528","10077696"],["70572902400","358522502400","814122000576","1088291268000","948508652160","563244645600","230808771648","64455264000","11740515840","1259712000","60466176"],["1270312243200","6876842457600","16805331024768","24473974827456","23602903346880","15829455533760","7534025763264","2545047381888","598060869120","93117911040","8646663168","362797056"],["24135932620800","138281880153600","360562344216192","565837507870272","595299012555456","442377075222720","238123222704576","93560054835456","26633440804608","5357605524480","722994066432","58773123072","2176782336"],["482718652416000","2910453198796800","8040938165245440","13480124222702592","15301005298330752","12419335579787136","7416726905427840","3299940432936576","1094029145104896","266952755317248","46605514475520","5513426860032","396174385152","13060694016"],["10137091700736000","64015829089228800","186322420662935040","331328237668227072","402201856601161344","352612078965514368","230267278492707456","113799110524235136","42774254644822272","12170182732291584","2580432335889408","395415050913792","41400223248384","2651320885248","78364164096"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","14","210","3360","57120","1028160","19535040","390700800","8204716800","180503769600","4151586700800","99638080819200","2490952020480000","64764752532480000","1748648318376960000"],"nonn":true,"definitions":[{"position":0,"source":"derived:shift_x_plus_one","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"]],"recurrence":{"terms":[{"coeff":{"coeffs":[["7","6"],["1","0"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":186620,"position":0,"claim":"real_rooted","from_index":0,"region_key":"(-inf, -1]","provenance":"edges","claim_data":{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"-1"}}},"label":"Real-rooted","description":"Every row P_n, n >= 0, is zero or real-rooted with all roots in (-inf, -1]","region_exact":null,"edges":["e-6aa15da779e8a4e2"]},{"id":186621,"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-0f952a6c20a76253","e-6aa15da779e8a4e2"]},{"id":186622,"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-0f952a6c20a76253","e-6aa15da779e8a4e2"]},{"id":186623,"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-0f952a6c20a76253","e-6aa15da779e8a4e2"]},{"id":186624,"position":4,"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-0f952a6c20a76253"]}],"region_exact":{},"incoming_edges":[{"id":"e-0f952a6c20a76253","operation":{"map":"A007318","operation":"basis_map"},"operation_detail":"A007318","conclusion_id":"n-7be2caa1a4f05535","premise_count":1,"theorem":"geometric family P_k = g(t) (a + d t)^k: T(p) = g(t) p(a + d t), so the roots of T(p) are those of g and the points (r - a)/d for the roots r of p (elementary)","lean_route":null,"lean_declarations":[],"certificate_hash":"58a4467be4e6cfea397d233559f674211bf41438f2f2b6e6d86c149b2a43e403","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-8a9c0145328414df","role":"sequence","name":"basis_map_A013610 of Coefficients of raising factorial polynomials, T(n,k) = [x^k] p(x, n) where p(x, n) = (m*x + n - 1)*p(x, n - 1) with p[x, 0] = 1, p[x, -1] = 0, p[x, 1] = m*x and m = 2. Triangle read by rows, for n >= 0 and 0 <= k <= 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]"}]},{"id":"e-6aa15da779e8a4e2","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"affine\",\"slope\":\"1\",\"intercept\":\"1\"}"},"operation_detail":"affine, shift 0","conclusion_id":"n-7be2caa1a4f05535","premise_count":1,"theorem":"a real affine substitution x -> a x + b (a != 0), the reversal x^d p(1/x) (d >= deg p) and a real Mobius map (c x + e)^d p((a x + b)/(c x + e)) (a e - b c != 0, d >= deg p) map real roots to real roots: a root r of p gives the root (r - b)/a, 1/r (and 0) or (e r - b)/(a - c r) (and -e/c); for an input row that is a polynomial the degree condition holds automatically","lean_route":null,"lean_declarations":["Polynomial.Splits.comp_of_degree_le_one"],"certificate_hash":"d3ae57fee5816aeb7fdc40fbe43c347cdd7714dbc149c502e2e60f256f332b7f","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"-1"}}},{"claim":"interlacing","from_index":1,"kind":"weak","orientation":"unordered"}],"premises":[{"position":0,"node_id":"n-8a9c0145328414df","role":"sequence","name":"basis_map_A013610 of Coefficients of raising factorial polynomials, T(n,k) = [x^k] p(x, n) where p(x, n) = (m*x + n - 1)*p(x, n - 1) with p[x, 0] = 1, p[x, -1] = 0, p[x, 1] = m*x and m = 2. Triangle read by rows, for n >= 0 and 0 <= k <= 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:          1;\n  1:          8,           6;\n  2:         72,         102,          36;\n  3:        720,        1452,         972,         216;\n  4:       7920,       20292,       19404,        8208,        1296;\n  5:      95040,      291024,      354600,      214920,       64800,        7776;\n  6:    1235520,     4353552,     6355944,     4921560,     2131920,      489888,      46656;\n  7:   17297280,    68362848,   115104528,   107037504,    59376240,    19649952,    3592512,     279936;\n  8:  259459200,  1129226400,  2136745008,  2296189728,  1532868624,   651006720,  171787392,   25754112,   1679616;\n  9: 4151347200, 19624377600, 40963278528, 49559505696, 38303036352, 19613319264, 6654638592, 1442790144, 181398528, 10077696;\n","recurrence_sentence":"The row polynomials satisfy P(n,x) = (n+7+6*x)*P(n-1,x) for n >= 1, with P(0,x) = 1.","mathematica":"P[0, x_] := 1;\nP[n_, x_] := P[n, x] = Expand[(n + 7 + 6*x)*P[n - 1, x]];\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] = (n + 7 + 6*x)*v[i - 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-60c7e36cbe887b7e","steps":["basis A013610","basis A007318"],"edges":["e-881cf76aa24e5971","e-0f952a6c20a76253"],"text":"A137320 \u2192 basis A013610 \u2192 basis A007318"},"headline":"A137320 \u2192 basis A013610 \u2192 basis A007318","chain":null}