Minor hack to prevent errors

ikosmidis · May 22, 2018 · 2eac9e5 · 2eac9e5
1 parent e8b04c5
commit 2eac9e5
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/build_network.R b/R/build_network.R
@@ -71,7 +71,8 @@ build_network.cranly_db <- function(object = clean_CRAN_db(),
                        object, by = "package", all.x = TRUE)
 
         base_packages <- utils::installed.packages(priority = "high")
-        base_package_names <- base_packages[, "Package"]
+        base_package_names <- unique(base_packages[, "Package"])
+
         inds <- which(base_package_names %in% nodes$package)
         nodes[nodes$package %in% base_package_names, "priority"] <- base_packages[inds, "Priority"]