testlist <- list(grow_node = -1885057419L, left_daughter = -1.10313086819576e-62, prior_tree_table_temp = structure(c(5.58866282685613e+110, 1.78410912754836e-211, 1.4048461375269e-265, 2.84026541294396e-265, 3.76107729781013e-205, 6.47651222666719e+286, 1.15735236393964e+202, 1.39117236233951e+224, 1.82998943389142e-48, 2.22273162525177e+101, 9.40477515612587e+291, 2.41176430133139e-41, 5.43346686390364e-253, 2.24697307508564e+185, 1.42258695708419e+117, 4.11863914412531e-170, 1.80249867982184e+156, 2.69873468551087e-257, 513.413034604041, 9.60149238001781e+92, 4.61550864254049e-205, 2.54407739298467e+197, 6.74880191831395e+41, 1.05056113599191e+142, 1.09200199296918e-46, 2.05090792806716e-252, 6.8510028479351e-164, 2.0073182687364e-238, 3.82166413518233e-50, 1.73268966618136e-81, 1.1296331034989e-105, 2.81947975363579e+252, 1.12846824295528e-299, 2.32530588991719e+292, 1.48233266325702e+296, 1.70285392143321e-50, 1.59850045443812e+113, 4.65728281895003e+126, 1.90493813103269e+124, 3.41381091183709e+155, 3.18347624460213e+131, 1.64825553153532e+274, 6.38506331293308e-254, 4.17373865810603e-182, 6.65396629015145e-209, 1.45921307356004e-143, 3.29093622988171e-30, 2.14263270897402e+61, 2.70786484151775e+256, 1.66491625736327e-224, 1.93513122318415e-229, 3.15060597400394e+40, 4.0197754679686e+91, 4.19798677861703e-286, 6.80091200320484e+157, 1.267753386791e-57, 5.99515868135342e-40, 5.79877867067928e-153, 3.52304421156837e+166, 3.47745641177339e-42, 4.91603353756249e+261, 1.58788798103037e+99, 1.35677588416539e-208, 1.18412242930513e-147, 2.41958807588149e-140, 2.21331724723628e-243, 1.05093952487167e+116, 9.0740072989334e-136, 5.8102408478935e-69, 8.63662829994877e-223, 2.58206946791842e+87, 44721996.1398109, 1.25381510651589e+122, 1.5821678388084e-117, 6384858241916320768, 3.09224792883114e-302, 6.48757699756324e+201, 1.1024292276738e+216, 2.05235434739526e-278, 3.46316900483078e+40, 2.21114350622691e-240, 1.50499785351474e-280, 2.33046980017449e+237, 5.74524577593018e+194, 4.42410607186166e-231, 2.70016435128174e-28, 4.75382292164116e+86, 1.55514850716971e-29, 1.47180413080959e+240, 4.2827685739859e+277), .Dim = 10:9)) result <- do.call(bartBMA:::set_daughter_to_end_tree,testlist) str(result)