BP_EstimateCompactness {BoneProfileR}R Documentation

Estimation of the compactness of a bone section

Description

Estimation of the compactness of a bone section.
The reference for radial estimation of compactness is the trigonometric circle for rotation.angle=0 in BP_EstimateCompactness():

Usage

BP_EstimateCompactness(
  bone,
  center = "ontogenetic",
  partial = FALSE,
  NbRemoveEdgePartial = 1,
  cut.angle = 60,
  cut.distance = 100,
  NbRemoveDistanceExterior = 1,
  rotation.angle = 0,
  analysis = 1,
  method = "Fast",
  show.plot = TRUE,
  cut.max = 360
)

Arguments

bone

The bone image to be used

center

Which center to be used: user, mineralized, unmineralized, section, ontogenetic

partial

Is the section partial?

NbRemoveEdgePartial

How many radial section to remove at the edge of partial section?

cut.angle

Number of angles

cut.distance

Number of distances

NbRemoveDistanceExterior

How many exterior sectors should be removed from analysis?

rotation.angle

The angle of rotation for analysis

analysis

The name or rank of analysis

method

Can be Fast, Accurate, FastConvex, or AccurateConvex

show.plot

should plot is shown ?

cut.max

The number of slices for the internal estimation

Details

BP_EstimateCompactness estimates the compactness of a bone section

Value

The orignial bone object with a new attribute for compactness

Author(s)

Marc Girondot marc.girondot@gmail.com

See Also

Other BoneProfileR: BP_AutoFit(), BP_ChooseBackground(), BP_ChooseCenter(), BP_ChooseForeground(), BP_DetectBackground(), BP_DetectCenters(), BP_DetectForeground(), BP_DuplicateAnalysis(), BP_FitBayesianCompactness(), BP_FitBayesianPeriodicCompactness(), BP_FitMLCompactness(), BP_FitMLPeriodicCompactness(), BP_FitMLRadialCompactness(), BP_GetFittedParameters(), BP_ListAnalyses(), BP_LnLCompactness(), BP_OpenImage(), BP_Report(), Erinaceus_europaeus, plot.BoneProfileR(), summary.BoneProfileR()

Examples

## Not run: 
# Not run:
library(BoneProfileR)
 bone <- BP_OpenImage()
 # or 
path_Hedgehog <- system.file("extdata", "Erinaceus_europaeus_fem_2-1_small.png", 
                             package = "BoneProfileR")
 bone <- BP_OpenImage(file=path_Hedgehog)
 bone <- BP_DetectBackground(bone=bone)
 bone <- BP_DetectForeground(bone=bone)
 bone <- BP_DetectCenters(bone=bone)
 bone <- BP_EstimateCompactness(bone)
 plot(bone, type="original", show.grid=FALSE)
 plot(bone, type="mineralized", show.grid=FALSE)
 plot(bone, type="unmineralized", show.grid=FALSE)
 plot(bone, type="section", show.grid=FALSE)
 plot(bone, type="original", show.grid=TRUE)

## End(Not run)

[Package BoneProfileR version 4.0 Index]