combine_mass_props() calculates the mass properties of an aggregate from
a list of constituent mass properties.
Examples
leaves <- names(igraph::neighbors(test_tree, "A.3", mode = "in"))
mpl <- Map(f = function(id) get_mass_props(test_table, id), leaves)
combine_mass_props(mpl)
#> $mass
#> [1] 8
#> 
#> $center_mass
#>  x  y  z 
#> -1  0  0 
#> 
#> $inertia
#>      x    y    z
#> x 32.0 -0.4 -0.4
#> y -0.4 24.0  0.4
#> z -0.4  0.4 24.0
#> 
#> $point
#> [1] FALSE
#>