Blood2 <- rbind(
do(239) * data.frame(response = "donated", Sex = "Male"),
do(201) * data.frame(response = "donated", Sex = "Female"),
do(1032) * data.frame(response = "did.not", Sex = "Male"),
do(1226) * data.frame(response = "did.not", Sex = "Female")
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.