R/test.R

test<-rnorm(5)
filename<-gsub(" ","_",gsub(':|- ', '_', Sys.time()),fixed=TRUE)
saveRDS(test, paste0("data/data-",filename,".RDS"))
chenmengkun/stat-5014-homework-6 documentation built on Jan. 2, 2022, 1:23 a.m.