Nothing
concrete.lm0 <- lm(strength ~ limestone + water, concrete)
concrete.lm1 <- lm(strength ~ limestone, concrete)
concrete.lm2 <- lm(strength ~ water, concrete)
concrete.lm3 <- lm(strength ~ 1, concrete)
concrete.lm4 <- lm(strength ~ I(limestone + water), concrete)
concrete.lm5 <- lm(strength ~ -1 + limestone + water, concrete)
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.