Estimate PCSA from from a pair of muscle attachment stl meshes.
Usage
pcsa(
stl1,
stl2,
fascicle_length = 1,
theta = 0,
units_adjust = 1,
stl_area = TRUE
)
Arguments
- stl1
String: Path to stl.
- stl2
String: Path to stl.
- fascicle_length
Numeric: Fascicle length
- theta
Numeric: Fascicle angle (radians)
- units_adjust
Numeric: Multiplier adjustment if units are not in mm.
- stl_area
Boolean: Use the area of the stl mesh (default) or use the
centroid size.
Value
numeric: Estimate of PCSA for the muscle defined by the two
attachments of `stl1` and `stl2`.
Examples
or_stl <- system.file("extdata", "L_mPTd_Or.stl",
package = "MuscleTernary")
ins_stl <- system.file("extdata", "L_mPTd_Ins.stl",
package = "MuscleTernary")
pcsa(or_stl, ins_stl)
#> Assuming theta is measured in radians.
#> Assuming units are mm.
#> Using mesh area for calculation.
#> [1] 1670.846