# \donttest{
head(coreid_data)
res <- equiv_tost(data = coreid_data,
groups_col = col,
groups_which = "Catorhintha schaffneri_APM",
response = response,
skews = c(1,10),
colrs = c("lightblue", "lightpink"),
equiv_margin = 1,
pop_n = 5)
# }
Run the code above in your browser using DataLab