Nothing
downloadMaster <- function(url = STATION.URL, localFile = MASTER.STATION.LIST){
require(RCurl)
X<-getURLContent(url, ssl.verifypeer = FALSE,verbose = TRUE)
Xcsv <- read.csv(textConnection(X),stringsAsFactors = FALSE)
write.csv(Xcsv,localFile)
}
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.