Defines functions p_set_cranrepo

Documented in p_set_cranrepo

#' Check if Repo is Set
#' Check if a repo is already set and if not choose an appropriate repo.
#' @param default_repo The default package repository.
p_set_cranrepo <- function(default_repo = "http://cran.rstudio.com/"){
	# TODO: make default_repo a package option?
    repos <- getOption("repos")
    # If no repo is set then choose the main CRAN mirror
    # this way the user doesn't have to deal with the repo...
    if("@CRAN@" %in% repos){
        repos[repos == "@CRAN@"] <- default_repo
        options(repos = repos)
    # If there are no repos set somehow then set to default
    if(length(repos) == 0){
        options(repos = default_repo)
    # Add ripley's repos on windows
    if(p_detectOS() == "Windows"){
            options(repos = c(options()$repos, 
                             CRANextra = "http://www.stats.ox.ac.uk/pub/RWin"))

Try the pacman package in your browser

Any scripts or data that you put into this service are public.

pacman documentation built on May 2, 2019, 1:08 p.m.