... | ... |
@@ -20,7 +20,6 @@ run_clustifyr_app <- function() { |
20 | 20 |
#' } |
21 | 21 |
#' @export |
22 | 22 |
install_clustifyr_app <- function() { |
23 |
- options(repos=structure(c(CRAN="http://cloud.r-project.org/"))) |
|
24 | 23 |
pack <- read.csv(system.file("shinyapp", "data", "dependencies.csv", package = "clustifyr")) |
25 | 24 |
inst <- installed.packages()[,"Package"] |
26 | 25 |
pack_need <- !unlist(vapply(pack$package, function(x) {x %in% inst}, logical(1))) |