pigs.lm <- lm(log(conc) ~ source + factor(percent), data = pigs)
pigs.emm <- emmeans(pigs.lm, "percent", type = "response")
multcomp::cld(pigs.emm, alpha = 0.10, Letters = LETTERS)
multcomp::cld(pigs.emm, alpha = 0.10, signif.sets = TRUE)
multcomp::cld(pigs.emm, delta = log(1.25), adjust = "sidak")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.