diff --git a/R/list_depends.R b/R/list_depends.R index 34ecbc6..f7297d2 100644 --- a/R/list_depends.R +++ b/R/list_depends.R @@ -1,9 +1,9 @@ -.list_depends <- function(depends, gen) { - packages <- installed.packages() - packages <- as.data.frame(packages) - packages <- packages[packages$Package %in% depends,] - packages <- packages[,c("Package", "Version", "Imports")] +.list_depends <- function(packages, gen) { + allPackages <- installed.packages() + allPackages <- as.data.frame(allPackages) + packages <- allPackages[allPackages$Package %in% packages,] + packages <- allPackages[,c("Package", "Version", "Imports")] packages$Imports <- gsub(packages$Imports, pattern = "\n", replacement = " ") packages$Imports <- strsplit(packages$Imports, ", ") packages <- data.frame( @@ -30,10 +30,10 @@ #' Recursively find all the installed dependencies of one or more installed #' packages. #' -#' @param depends A character vector of packages to find dependencies of +#' @param packages A character vector of packages to find dependencies of #' #' @return A data frame with the dependency tree #' @export -list_depends <- function(depends) { - .list_depends(depends, gen = 0) +list_depends <- function(packages) { + .list_depends(packages, gen = 0) } \ No newline at end of file diff --git a/man/list_depends.Rd b/man/list_depends.Rd index 58b2e33..dfc4eb3 100644 --- a/man/list_depends.Rd +++ b/man/list_depends.Rd @@ -5,10 +5,10 @@ \title{Recursively find all the installed dependencies of one or more installed packages.} \usage{ -list_depends(depends) +list_depends(packages) } \arguments{ -\item{depends}{A character vector of packages to find dependencies of} +\item{packages}{A character vector of packages to find dependencies of} } \value{ A data frame with the dependency tree