context("adapt")
test_that("str_length is number of characters", {
data(mtcars)
m = adapt(mpg~., data=mtcars, family=gaussian)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.