Data Engineering and BI courses are free this week!
Calculate the distance maps between all pairs from a list of 3D meshes. Used for distance-based agreement measures such as the Hausdorff distance or the average surface distance.
get_mesh_metro(x, chop=TRUE, ...)list of lists with the object returned by vcgMetro together with the name of the comparison and a name for the structure.
list of observer/mesh objects as generated by read_mesh.
logical. Delete the components from output of vcgMetro that will not be used later on.
Options passed to vcgMetro.
Thin front-end for vcgMetro. Use get_mesh_metro_pair to process a single mesh pair. Calculating agreement measures for all pairs for a list of 3D meshes is done in get_mesh_agree.
data_heart_obsL,
read_mesh,
get_mesh_metro_pair,
get_mesh_agree,
vcgMetro
heartL <- mesh3dL_to_cgalMeshL(data_heart_obsL)
metroL <- get_mesh_metro(heartL, nSamples=500L, silent=TRUE)
# Hausdorff distance
get_HD_max <- function(x) {
max(c(x$ForwardSampling$maxdist,
x$BackwardSampling$maxdist))
}
Map(get_HD_max, metroL)
Run the code above in your browser using DataLab