# NOT RUN {
library(TestDimorph)
# selecting means and sample sizes
van_vark_data <- Howells_summary[!endsWith(
x = names(Howells_summary),
suffix = "dev"
)]
# running the function
van_vark(van_vark_data, Howells_V)
# }
Run the code above in your browser using DataLab