Nothing
#' Update Out-of-Date Packages
#'
#' Either view out of date packages or update out of data packages.
#'
#' @rdname p_update
#' @param update logical. If \code{TRUE} updates any out-of-date packages; if
#' \code{FALSE} returns a list of out-of-date packages.
#' @param ask logical. If \code{TRUE} asks user before packages are actually
#' downloaded and installed, or the character string \code{"graphics"}, which
#' brings up a widget to allow the user to (de-)select from the list of packages
#' which could be updated or added.
#' @param \ldots Other arguments passed to \code{\link[utils]{update.packages}}.
#' @seealso \code{\link[utils]{update.packages}},
#' \code{\link[utils]{old.packages}}
#' @keywords update packages
#' @export
#' @examples
#' \dontrun{
#' p_update()
#' p_update(FALSE)
#' p_up(FALSE)
#' }
p_update <-
function (update = TRUE, ask = FALSE, ...) {
p_set_cranrepo()
out <- unname(utils::old.packages()[, 1])
if (update){
# TODO: Add package options
# Make 'ask' one of those options...
utils::update.packages(ask = ask, ...)
return(invisible(out))
}
out
}
#' @rdname p_update
#' @export
p_up <- p_update
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.