Here will be a vignette...

# toyData <- read.csv("https://raw.githubusercontent.com/alicebalard/Article_IntensityEimeriaHMHZ/master/data/cleanedData.csv")
# toyData <-toyData[toyData$Aspiculuris_Syphacia != 0,]
# 
# m <- mlHyb(Aspiculuris_Syphacia~., data = toyData, model = "negbin")
# m


alicebalard/Parasite_Load documentation built on May 20, 2021, 7:37 p.m.