Calculate mean shape metrics of a set of polygons
Examples
spe <- imcdatasets::Damond_2019_Pancreas("spe", full_dataset = FALSE)
#> see ?imcdatasets and browseVignettes('imcdatasets') for documentation
#> loading from cache
islet_poly <- reconstructShapeDensityImage(spe,
marks = "cell_category",
image_col = "image_name", image_id = "E04", mark_select = "islet", dim = 500
)
shape_metrics <- totalShapeMetrics(islet_poly)
meanShapeMetrics(shape_metrics)
#> [,1]
#> Area 9.743108e+03
#> Compactness 1.854784e+00
#> Eccentricity 6.916182e-01
#> Circularity 8.727960e-01
#> Solidity 9.600750e-01
#> Curl 2.607452e-01
#> fibreLength 1.651200e+02
#> fibreWidth 4.433570e+01
#> numberStructures 4.000000e+00
#> totalArea 3.897243e+04