{"id":"n-2eba56c0d02ad420","revision":0,"first_index":0,"fingerprint":"f6-1272df06034c859c","name":"one_plus_derivative of basis_map_A013611 of Triangle T(n,k)=Sum_{i=0..n} |stirling1(n,n-i)|*binomial(i,k), k=0..n-1.","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"],["7","4"],["59","108","32"],["593","1992","1904","384"],["7017","35224","61040","40064","6144"],["96087","649244","1667440","1971264","991744","122880"],["1498611","12802868","44021200","76730304","69259264","28348416","2949120"],["26262945","272181456","1178949792","2741028864","3635079424","2662789120","920567808","82575360"],["511334865","6243048432","32719081632","95576972288","168624232704","181031473152","111820193792","33504362496","2642411520"],["10955901735","154193491188","950203408416","3351881353856","7415316188928","10570027889664","9551245967360","5107252396032","1351489683456","95126814720"],["256263099435","4088346290748","28999857594816","120107741422976","320388183496448","571787504876544","684976754892800","535080762540032","252485313232896","59862323036160","3805072588800"],["6499020952305","115978147772184","931492276515216","4435600259943808","13875571880421120","29823228093294592","44677051378315264","46213697812856832","31822677067694080","13445897486598144","2888882077040640","167423193907200"],["177654762682425","3508180466851080","31489346669059728","169627149307864192","609518934223021824","1534869477697583104","2766483503498211328","3575048939422973952","3256705605093818368","2006370082621489152","767892024597676032","150888232853176320","8036313307545600"],["5207782978617975","112785863537758860","1119436964842350096","6734261326866647232","27353555361841959680","79060270918589019136","166823167834578890752","259175212372335017984","294722445690526105600","240016221691423227904","133847899590509985792","46835896170571628544","8481056859661271040","417888291992371200"],["162979356993826275","3842108085586315140","41797843419505546224","277872150827040611136","1259678872794898077952","4113045350355471444992","9955059834975063724032","18094219215020580126720","24720484222296557355008","25114342449303949148160","18501646838158139064320","9427935460720128294912","3039477342052773003264","510459688960382730240","23401744351572787200"]],"degrees":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14],"row_sums":["1","11","199","4873","149489","5498659","235609783","11519434769","632673110881","38557693095355","2581838123071655","188403998695311385","14880615444521953105","1264705306720254851795","115083426100678642055575"],"nonn":true,"definitions":[{"position":0,"source":"derived:one_plus_derivative","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"],["7","4"]],"recurrence":{"denominator":{"coeffs":[["-1"],["1"]]},"terms":[{"coeff":{"coeffs":[["0","0","0"],["-1","-8","-16"],["4","24","32"],["-4","-16","-16"]]},"deriv_order":0,"offset":2,"sign":"none"},{"coeff":{"coeffs":[["-1","0"],["-2","-8"],["4","8"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":191501,"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-3ce287ac739dc74d"]},{"id":191502,"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-3ce287ac739dc74d"]},{"id":191503,"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-3ce287ac739dc74d"]},{"id":191504,"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-3ce287ac739dc74d"]}],"region_exact":{},"incoming_edges":[{"id":"e-3ce287ac739dc74d","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"derivative_polynomial\",\"coefficients\":[{\"numerator\":[\"1\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"derivative_polynomial, shift 0","conclusion_id":"n-2eba56c0d02ad420","premise_count":1,"theorem":"Laguerre's theorem on differential operators: if phi is a real polynomial with only real roots, then phi(D) maps every real-rooted polynomial to a real-rooted polynomial or zero (write phi(D) = C D^j prod (1 + c_i D); D preserves real-rootedness by Rolle's theorem and p + c p' is real-rooted for every real c by Rolle's theorem applied to e^(x/c) p; Polya--Schur 1914); when the coefficients of phi have one sign, coefficients of one sign stay of one sign; applied to phi(n, .) for each n","lean_route":null,"lean_declarations":["RealRooted.splits_add_C_mul_derivative_all","RealRooted.splits_C_mul_add_derivative","Polynomial.Splits.derivative"],"certificate_hash":"0f906d0b852278c42132566ff56df89d9a44b87082df661f0d17d87e42f94e11","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-be7df2e3fd154f3c","role":"sequence","name":"basis_map_A013611 of Triangle T(n,k)=Sum_{i=0..n} |stirling1(n,n-i)|*binomial(i,k), k=0..n-1.","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:           7,            4;\n  2:          59,          108,           32;\n  3:         593,         1992,         1904,           384;\n  4:        7017,        35224,        61040,         40064,          6144;\n  5:       96087,       649244,      1667440,       1971264,        991744,         122880;\n  6:     1498611,     12802868,     44021200,      76730304,      69259264,       28348416,       2949120;\n  7:    26262945,    272181456,   1178949792,    2741028864,    3635079424,     2662789120,     920567808,      82575360;\n  8:   511334865,   6243048432,  32719081632,   95576972288,  168624232704,   181031473152,  111820193792,   33504362496,    2642411520;\n  9: 10955901735, 154193491188, 950203408416, 3351881353856, 7415316188928, 10570027889664, 9551245967360, 5107252396032, 1351489683456, 95126814720;\n","recurrence_sentence":"The row polynomials satisfy (n-1)*P(n,x) = -(4*n^3-4*n^2+n+(16*n^3-24*n^2+8*n)*x+(16*n^3-32*n^2+16*n)*x^2)*P(n-2,x) + (4*n^2-2*n-1+(8*n^2-8*n)*x)*P(n-1,x) for n >= 2, with P(0,x) = 1, P(1,x) = 7 + 4*x.","mathematica":"P[0, x_] := 1;\nP[1, x_] := 7 + 4*x;\nP[n_, x_] := P[n, x] = Expand[Together[(-(4*n^3 - 4*n^2 + n + (16*n^3 - 24*n^2 + 8*n)*x + (16*n^3 - 32*n^2 + 16*n)*x^2)*P[n - 2, x] + (4*n^2 - 2*n - 1 + (8*n^2 - 8*n)*x)*P[n - 1, x])/(n - 1)]];\nTable[CoefficientList[P[n, x], x], {n, 0, 9}] // Flatten","pari":"P(N) = {my(v = vector(N + 1)); v[1] = 1; v[2] = 7 + 4*x; for(n = 2, N, my(i = n + 1); v[i] = (-(4*n^3 - 4*n^2 + n + (16*n^3 - 24*n^2 + 8*n)*x + (16*n^3 - 32*n^2 + 16*n)*x^2)*v[i - 2] + (4*n^2 - 2*n - 1 + (8*n^2 - 8*n)*x)*v[i - 1])/(n - 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-7fd16a32c438d522","steps":["basis A013611","D+1"],"edges":["e-5d9e378754634336","e-3ce287ac739dc74d"],"text":"A059364 \u2192 basis A013611 \u2192 D+1"},"headline":"A059364 \u2192 basis A013611 \u2192 D+1","chain":null}
