# Empty date field returns current repo
oldRepos <- getOption("repos")
setSnapshot()
# Valid snapshot date
# Connects to MRAN to check for valid URL, so skip on CRAN
## Not run:
# setSnapshot("2014-11-16")
# ## End(Not run)
# Invalid snapshot date (in future), returns error
## Not run:
# setSnapshot("2100-01-01")
# ## End(Not run)
options(repos = oldRepos)
Run the code above in your browser using DataLab