Print dependency tree for R package

PrintDependencyTree

## function getDependencyTree()
# Only parameter that's required is the package you want a dependency tree for
getDependencyTree <- function(pack, i = -1, depLevel = c("Depends", "Imports", "LinkingTo"), availablePackages = available.packages()) {
	if(i == -1) cat(pack, "\n")
	i <- i + 1
	packages <- unlist(tools::package_dependencies(pack, availablePackages, which = depLevel))
	for(pkg in packages) { 
		for(n in 0:i) {
			cat(" ")
		}
		cat("|", pkg, "\n")
		getDependencyTree(pkg, i, depLevel)
	}
} ## end function getDependencyTree()

Runs much faster if you change line 12 to this:

getDependencyTree(pkg, i, depLevel, availablePackages)