test <- rnorm(5)
filename <- gsub(" ","_",gsub(':|- ', '_', Sys.time()),fixed=TRUE)
saveRDS(test, paste0("data/data-",filename,".RDS"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.