vol_faceweighted: Compute volume departures from reference plane
In evanmascitti/soilmesh: Processes 3D Meshes Without Headaches

Description Usage Arguments Details Value Examples

Computes area of each face and average distance of its 3 vertices. Multiplies these values to yield a weighted "approximate volume" for each face. Sums the values based on whether the mean distance is above or below the reference # datum.

1	vol_faceweighted(mesh, radius = 7)

`mesh`	Object of class "mesh3d"
`radius`	Radius in cm that the mesh was trimmed, see `pre_process_mesh()` and `remove_cyl()`

\lifecycle

experimental

List of length 3; each element is a numeric vector of length 1 containing the computed volume above or below the reference datum, or the sum of these two (absolute value, i.e. total displacement)

library(magrittr)
library(soilmesh)
library(mesheR)

trimmed <- remove_cyl(untrimmed_mesh1) %>%
  adjust_xy() %>%
  adjust_z()


rgl::clear3d()
mesheR::wiremesh3d(trimmed)
add_origin_axes()
mesheR::wiremesh3d(ref_circ)

vols <- vol_faceweighted(trimmed, radius = 7)