{"id":"n-66407c1a4552c33b","revision":0,"first_index":0,"fingerprint":"f6-d115b0993943a210","name":"theta_plus_one_squared of basis_map_A013610 of Triangle T(n,k) with the coefficient of [x^k] of the polynomial (2*(x+1)^2)^n in row n, column k, 0<=k<=2n.","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"],["8","96","162"],["64","1536","7776","13824","8100"],["512","18432","155520","552960","972000","839808","285768"],["4096","196608","2322432","12386304","36288000","62705664","64012032","35831808","8503056"],["32768","1966080","29859840","212336640","870912000","2257403904","3840721920","4299816960","3061100160","1259712000","228637728"],["262144","18874368","350355456","3114270720","16422912000","56757583872","135193411584","227030335488","269376814080","221709312000","120720720384","39182082048","5748065856"],["2097152","176160768","3864526848","41221619712","265686220800","1147764473856","3515028701184","7870384963584","13073754710016","16140437913600","14647447406592","9508185243648","4184591943168","1119954511872","137749507200"],["16777216","1610612736","40768634880","507343011840","3864526848000","20033707180032","74987278958592","209876932362240","448243018629120","737848590336000","937436634021888","912785783390208","669534710906880","358385443799040","132239526912000","30091839012864","3184768606464"],["134217728","14495514624","415840075776","5914169966592","51980009472000","314375097286656","1390673173413888","4670715731116032","12192210106712064","25086852071424000","40979372858671104","53202371374743552","54634032410001408","43866378321002496","26976863490048000","12277470317248512","3898156774311936","771220920950784","71607703822848"],["1073741824","128849018880","4131221667840","66099546685440","658413453312000","4550953789292544","23228826632847360","91019075785850880","280790293366702080","693309366337536000","1384192149892890624","2246322346933616640","2965847473685790720","3175090240377323520","2733655500324864000","1866175488221773824","987533049492357120","390751933281730560","108843709810728960","19042491875328000","1574576046941184"],["8589934592","1133871366144","40181566537728","714338960670720","7952601710592000","61839430901563392","357723930145849344","1601935733830975488","5702202880677642240","16426098833227776000","38757380197000937472","75476430856969519104","121797469586029805568","162987965672702607360","180421263021441024000","164223442963516096512","121664071697458397184","72210957270463807488","33523862621704519680","11730174995202048000","2909816534747308032","456220020349108224","33997988931913728"],["68719476736","9895604649984","384073155477504","7510763929337856","92417603036774400","798488090237730816","5162447305634217984","26007897796314660864","104920533004468617216","345417392607304089600","940398851373385383936","2136563581181906386944","4074678982514451677184","6543225967369588310016","8852669972252039577600","10072371168428987252736","9594081082428147892224","7592466364437337473024","4934712577914905296896","2590022638940612198400","1070812484787009355776","335777934976943652864","75067559561665511424","10661358011223638016","723019613391360000"],["549755813888","85761906966528","3618080450150400","77185716269875200","1040198129418240000","9886043021990952960","70644015761310351360","395441720879638118400","1782963305958290227200","6603567799845519360000","20375308446423349985280","52905383914980539105280","116419399500412905062400","218107532245652943667200","348741544361443983360000","476148455234824851947520","554324684762515211550720","548344792987141039718400","458223310806384063283200","320669469583123415040000","185607497363081621667840","87302263094005349744640","32529275810055054950400","9239843609727152947200","1879850994817536000000","243989620319357632512","15179941387074281472"],["4398046511104","738871813865472","33664847019245568","778032020000342016","11396953417973760000","118163613037551943680","924794388148062781440","5694360780666788904960","28377268616936156037120","116778883197268131840000","402711978705779152650240","1176366771756626104811520","2933768867410405207572480","6281496928674804777615360","11588949781857215447040000","18459909341411671183196160","25398149192755242420142080","30148993708965718256517120","30792606486189009052631040","26936235444982366863360000","20045609715212815140126720","12571525885536770363228160","6557902003307099078000640","2794128707581491051233280","947444901388038144000000","245941537281912493572096","45904142754512627171328","5485268696774561759232","315218042136530141184"]],"degrees":[0,2,4,6,8,10,12,14,16,18,20,22,24,26,28],"row_sums":["1","266","31300","2825000","222250000","16062500000","1095625000000","71656250000000","4539062500000000","280390625000000000","16972656250000000000","1010351562500000000000","59306640625000000000000","3439941406250000000000000","197485351562500000000000000"],"nonn":true,"definitions":[{"position":0,"source":"derived:theta_plus_one_squared","source_kind":"derived","equality_edge_id":null,"recurrence":{"first_index":0,"initial_polynomials":[["1"]],"recurrence":{"denominator":{"coeffs":[["4","-24","9"],["0","36","-36"],["0","0","36"]]},"terms":[{"coeff":{"coeffs":[["32","192","432","432","162"],["0","288","1152","1512","648"],["0","0","288","864","648"]]},"deriv_order":0,"offset":1,"sign":"none"}]},"schema":"polytool.recurrence.v1"}}],"properties":[{"id":193627,"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-9fe5d9f1b7f869f1"]},{"id":193628,"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-9fe5d9f1b7f869f1"]},{"id":193629,"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-9fe5d9f1b7f869f1"]}],"region_exact":{},"incoming_edges":[{"id":"e-9fe5d9f1b7f869f1","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-66407c1a4552c33b","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":"f9da2cbbcde0f7bb9570529740d18c648b2030c93c06070f7a01ebd1236c84a5","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-87b7b64af43d2638","role":"sequence","name":"basis_map_A013610 of Triangle T(n,k) with the coefficient of [x^k] of the polynomial (2*(x+1)^2)^n in row n, column k, 0<=k<=2n.","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":[{"id":"l-ea068e5dc433974c","kind":"fingerprint_related","node_a_id":"n-a43d8d44a6eb5699","node_b_id":"n-66407c1a4552c33b","fingerprint":"f6-d115b0993943a210","oeis_id":null,"in_catalog":null,"target":null,"row_alignment":null,"rows_matched":null,"oeis_nonn":null,"details":{"fingerprint":"f6-d115b0993943a210"},"other_id":"n-a43d8d44a6eb5699","other":{"id":"n-a43d8d44a6eb5699","name":"theta_plus_one_squared of basis_map_A013610 of Even-numbered rows of Pascal's triangle.","first_index":0,"fingerprint":"f6-d115b0993943a210","polytool_family":null,"degree_pattern":"affine","palindromic":0,"gamma_positive":0,"nonnegative":1,"rr_by_factors":0,"preview_rows":[["1"],["4","48","81"],["16","384","1944","3456","2025"]],"card_rows":[["1"],["4","48","81"],["16","384","1944","3456","2025"],["64","2304","19440","69120","121500","104976","35721"]],"row_sums_preview":["1","133","7825","353125","13890625","501953125","17119140625","559814453125"],"regions":["(-inf, 0]"],"region_exact":{},"oeis_ids":[],"derivation":{"root":"n-08f49539099949d5","steps":["basis A013610","(\u03b8+1)\u00b2"],"edges":["e-cb7f9b19b94bd36e","e-693fa493adf4b12c"],"text":"A034870 \u2192 basis A013610 \u2192 (\u03b8+1)\u00b2"},"headline":"A034870 \u2192 basis A013610 \u2192 (\u03b8+1)\u00b2","chain":null}}],"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,          96,          162;\n  2:        64,        1536,         7776,         13824,           8100;\n  3:       512,       18432,       155520,        552960,         972000,          839808,           285768;\n  4:      4096,      196608,      2322432,      12386304,       36288000,        62705664,         64012032,         35831808,           8503056;\n  5:     32768,     1966080,     29859840,     212336640,      870912000,      2257403904,       3840721920,       4299816960,        3061100160,        1259712000,         228637728;\n  6:    262144,    18874368,    350355456,    3114270720,    16422912000,     56757583872,     135193411584,     227030335488,      269376814080,      221709312000,      120720720384,       39182082048,        5748065856;\n  7:   2097152,   176160768,   3864526848,   41221619712,   265686220800,   1147764473856,    3515028701184,    7870384963584,    13073754710016,    16140437913600,    14647447406592,     9508185243648,     4184591943168,     1119954511872,      137749507200;\n  8:  16777216,  1610612736,  40768634880,  507343011840,  3864526848000,  20033707180032,   74987278958592,  209876932362240,   448243018629120,   737848590336000,   937436634021888,   912785783390208,   669534710906880,   358385443799040,   132239526912000,    30091839012864,    3184768606464;\n  9: 134217728, 14495514624, 415840075776, 5914169966592, 51980009472000, 314375097286656, 1390673173413888, 4670715731116032, 12192210106712064, 25086852071424000, 40979372858671104, 53202371374743552, 54634032410001408, 43866378321002496, 26976863490048000, 12277470317248512, 3898156774311936, 771220920950784, 71607703822848;\n","recurrence_sentence":"The row polynomials satisfy (4+(36*n-24)*x+(36*n^2-36*n+9)*x^2)*P(n,x) = (32+(288*n+192)*x+(288*n^2+1152*n+432)*x^2+(864*n^2+1512*n+432)*x^3+(648*n^2+648*n+162)*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[((32 + (288*n + 192)*x + (288*n^2 + 1152*n + 432)*x^2 + (864*n^2 + 1512*n + 432)*x^3 + (648*n^2 + 648*n + 162)*x^4)*P[n - 1, x])/(4 + (36*n - 24)*x + (36*n^2 - 36*n + 9)*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] = ((32 + (288*n + 192)*x + (288*n^2 + 1152*n + 432)*x^2 + (864*n^2 + 1512*n + 432)*x^3 + (648*n^2 + 648*n + 162)*x^4)*v[i - 1])/(4 + (36*n - 24)*x + (36*n^2 - 36*n + 9)*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-336459bdce627a87","steps":["basis A013610","(\u03b8+1)\u00b2"],"edges":["e-a142fb8711dcbce4","e-9fe5d9f1b7f869f1"],"text":"A139548 \u2192 basis A013610 \u2192 (\u03b8+1)\u00b2"},"headline":"A139548 \u2192 basis A013610 \u2192 (\u03b8+1)\u00b2","chain":null}
