Nothing
Code
expect_error(fit_model(yields, "height", "weight"))
expect_error(fit_models(df = yields, yname = c("height"), xname = "width + yield",
modeltype = "lm"))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.