if (FALSE) {
# Not run:
library(BoneProfileR)
path_Hedgehog <- system.file("extdata", "Erinaceus_europaeus_fem_2-1_small.png",
package = "BoneProfileR")
bone <- BP_AutoFit(file=path_Hedgehog, xlsx=TRUE)
# or to open a dialog box
bone <- BP_AutoFit()
}
Run the code above in your browser using DataLab