adds LinkingTo items to dependency reporter (resolves #303) (#319)

NEWS.md

@@ -1,6 +1,7 @@
 # pkgnet (dev)
 ## NEW FEATURES
 * `do.call` with the function argument as string will now properly appear on the function reporter.  Previously, this would show as a `do.call` node with a circular reference. (#302)
+* `LinkingTo:` package dependencies are now included in the `DependencyReporter` and subsequent HTML report and objects. (#319 Thanks @petergodbert !) 
 
 ## CHANGES
 * Updated `pkgnet-intro` vignette to include information on the Class Inheritance Reporter and other minor edits. 
@@ -9,7 +10,7 @@
 
 # pkgnet 0.4.2
 ## NEW FEATURES
-* Node coloring in DependencyReporter (#243)
+* Node coloring in `DependencyReporter` (#243)
 
 ## CHANGES
 * Removed LazyData field to accomodate change in CRAN policy. (#289)

R/DependencyReporter.R

@@ -40,7 +40,7 @@ DependencyReporter <- R6::R6Class(
 
     public = list(
 
-        initialize = function(dep_types = c("Imports", "Depends"), installed = TRUE){
+        initialize = function(dep_types = c("Imports", "Depends", "LinkingTo"), installed = TRUE){
 
             # Check inputs
             assertthat::assert_that(

inst/milne/DESCRIPTION

@@ -13,6 +13,8 @@ Imports:
 Suggests:
     covr,
     testthat
+LinkingTo:
+    Rcpp
 License: file LICENSE
 LazyData: TRUE
 RoxygenNote: 6.1.1

tests/testthat/test-DependencyReporter-network.R

@@ -21,3 +21,23 @@ test_that('DependencyReporter extracts expected network for baseballstats', {
     )
 })
 
+test_that('DependencyReporter extracts expected network for milne (with LinkingTo:)', {
+
+  testObj <- DependencyReporter$new()$set_package('milne')
+
+  # Test nodes
+  expect_equivalent(
+    object = testObj$nodes
+    , expected = data.table::fread(file.path('testdata', 'milne_dependency_nodes.csv'))
+    , ignore.col.order = TRUE
+    , ignore.row.order = TRUE
+  )
+
+  # Test edges
+  expect_equivalent(
+    object = testObj$edges
+    , expected = data.table::fread(file.path('testdata', 'milne_dependency_edges.csv'))
+    , ignore.col.order = TRUE
+    , ignore.row.order = TRUE
+  )
+})

tests/testthat/testdata/milne_dependency_edges.csv

@@ -0,0 +1,11 @@
+SOURCE,TARGET
+Rcpp,methods
+Rcpp,utils
+graphics,grDevices
+methods,stats
+methods,utils
+milne,R6
+milne,Rcpp
+stats,grDevices
+stats,graphics
+stats,utils

tests/testthat/testdata/milne_dependency_nodes.csv

@@ -0,0 +1,9 @@
+node
+R6
+Rcpp
+grDevices
+graphics
+methods
+milne
+stats
+utils