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
#>