Nothing
lymph3.glm <- glm(nodes ~ X.ray + stage + grade + acid.ph,
data=lymph, family=binomial)
anova(lymph3.glm, test="Chisq")
summary(lymph3.glm)
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.