context("Multispecies trait models")
test_that("msm defaults produces a glmerMod", {
msm_glmer <- msm("present", "plot", "logit_rock", "species", "ln_sla", eucs)
expect_equivalent(class(msm_glmer), "glmerMod")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.