{"id":"n-a99de495fe940cd0","revision":0,"first_index":0,"fingerprint":"f6-b1018962b1f2016f","name":"derivative of Triangle read by rows: T(n,0) = 0 for n >= 0; T(n,2*k+1) = A152842(2*n,2*(n-k)) and T(n,2*k) = A152842(2*n,2*(n-k)+1) for n >= k > 0.","polytool_family":null,"interpretation":null,"rows_observed":15,"degree_pattern":"affine","degree_slope":2,"degree_intercept":0,"palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":false,"rows":[["1"],["3","8","3"],["9","48","66","32","5"],["27","216","513","544","285","72","7"],["81","864","2916","4800","4430","2400","756","128","9"],["243","3240","14175","31680","42150","35664","19670","7040","1575","200","11"],["729","11664","62694","177120","308475","356832","284452","158592","61695","16400","2838","288","13"],["2187","40824","260253","889056","1915515","2816856","2950437","2251904","1264473","521640","156079","32928","4641","392","15"],["6561","139968","1032264","4136832","10625580","18978624","24678360","23999232","17720406","9999680","4308920","1405824","341068","59584","7080","512","17"],["19683","472392","3956283","18195840","54281340","114143904","177477804","210117888","192887082","138755440","78583626","35019648","12207468","3288096","670140","99840","10251","648","19"],["59049","1574640","14762250","76632480","260417025","630275904","1141098840","1593872640","1752377490","1536189600","1082025692","614475840","281245770","103306560","30187800","6916608","1214565","157680","14250","800","21"],["177147","5196312","53911737","311778720","1189017225","3255778152","6729167907","10838437632","13896686430","14389254000","12147106026","8408421696","4785223586","2238328400","857820150","267615744","67252119","13398264","2065965","237600","19173","968","23"],["531441","17006112","193444524","1233258048","5215798170","15942285216","37045759212","67618260864","99114815943","118478859840","116738874648","95497923456","65147835532","37138081344","17687708280","7020969472","2311319439","626095008","137932476","24298560","3338874","344608","25116","1152","25"],["1594323","55269864","683964567","4765490496","22136092290","74712573936","192836726082","393463204992","649256883561","880469698680","992663937837","938074400640","747231966156","503465318048","287396910060","138973985280","56819147957","19565993304","5640549057","1349325120","264522258","41753712","5173298","484224","32175","1352","27"],["4782969","178564176","2388295854","18054822240","91375670295","337539200544","958159385820","2161545699456","3966288006681","6018824251440","7645594678722","8202411296352","7479833258079","5823661480896","3882089966280","2218537707008","1086813379379","455689516464","163037372498","49537648160","12695023341","2717992992","479841180","68595072","7737275","662480","40446","1568","29"]],"degrees":[0,2,4,6,8,10,12,14,16,18,20,22,24,26,28],"row_sums":["1","14","160","1664","16384","155648","1441792","13107200","117440512","1040187392","9126805504","79456894976","687194767360","5909874999296","50577534877696"],"nonn":true,"definitions":[{"position":0,"source":"derived:derivative","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"]],"recurrence":{"denominator":{"coeffs":[["3","0","-1"],["0","4","2"]]},"terms":[{"coeff":{"coeffs":[["9","24","22","8","1"],["0","12","22","12","2"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":182814,"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-41879d20c382b8d1"]},{"id":182815,"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-41879d20c382b8d1"]},{"id":182816,"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-41879d20c382b8d1"]}],"region_exact":{},"incoming_edges":[{"id":"e-41879d20c382b8d1","operation":{"index_shift":0,"operation":"preserver_image","operator":"{\"shape\":\"derivative_polynomial\",\"coefficients\":[{\"numerator\":[\"0\"],\"denominator\":[\"1\"]},{\"numerator\":[\"1\"],\"denominator\":[\"1\"]}]}"},"operation_detail":"derivative_polynomial, shift 0","conclusion_id":"n-a99de495fe940cd0","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":"54d930ec2087c7047c0333b0c9a611cd10f9543a13e6bd465977da12a83c8a3b","verification_polytool":"replayed","verification_lean":"not_attempted","claims":[{"claim":"real_rooted","from_index":0,"region":{"upper":{"closed":true,"value":"0"}}}],"premises":[{"position":0,"node_id":"n-7e353d0275e3ebc5","role":"sequence","name":"Triangle read by rows: T(n,0) = 0 for n >= 0; T(n,2*k+1) = A152842(2*n,2*(n-k)) and T(n,2*k) = A152842(2*n,2*(n-k)+1) for n >= k > 0.","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:     3,      8,       3;\n  2:     9,     48,      66,       32,        5;\n  3:    27,    216,     513,      544,      285,        72,         7;\n  4:    81,    864,    2916,     4800,     4430,      2400,       756,       128,         9;\n  5:   243,   3240,   14175,    31680,    42150,     35664,     19670,      7040,      1575,       200,       11;\n  6:   729,  11664,   62694,   177120,   308475,    356832,    284452,    158592,     61695,     16400,     2838,      288,       13;\n  7:  2187,  40824,  260253,   889056,  1915515,   2816856,   2950437,   2251904,   1264473,    521640,   156079,    32928,     4641,     392,     15;\n  8:  6561, 139968, 1032264,  4136832, 10625580,  18978624,  24678360,  23999232,  17720406,   9999680,  4308920,  1405824,   341068,   59584,   7080,   512,    17;\n  9: 19683, 472392, 3956283, 18195840, 54281340, 114143904, 177477804, 210117888, 192887082, 138755440, 78583626, 35019648, 12207468, 3288096, 670140, 99840, 10251, 648, 19;\n","recurrence_sentence":"The row polynomials satisfy (3+4*n*x+(2*n-1)*x^2)*P(n,x) = (9+(12*n+24)*x+(22*n+22)*x^2+(12*n+8)*x^3+(2*n+1)*x^4)*P(n-1,x) for n >= 1, with P(0,x) = 1.","mathematica":"P[0, x_] := 1;\nP[n_, x_] := P[n, x] = Expand[Together[((9 + (12*n + 24)*x + (22*n + 22)*x^2 + (12*n + 8)*x^3 + (2*n + 1)*x^4)*P[n - 1, x])/(3 + 4*n*x + (2*n - 1)*x^2)]];\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] = ((9 + (12*n + 24)*x + (22*n + 22)*x^2 + (12*n + 8)*x^3 + (2*n + 1)*x^4)*v[i - 1])/(3 + 4*n*x + (2*n - 1)*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-7e353d0275e3ebc5","steps":["D"],"edges":["e-41879d20c382b8d1"],"text":"A299989 \u2192 D"},"headline":"A299989 \u2192 D","chain":null}
