Nothing
options(width=210,max.print=50)
Eg1_1 <- read.csv("Txt/Eg1_1.csv")
Eg1_2 <- read.csv("Txt/Eg1_2.csv")
saveRDS(Eg1_1,"../RDS/Eg1_1.rds")
saveRDS(Eg1_2,"../RDS/Eg1_2.rds")
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.