Fix get.expanded.adjacency.matrices

to have correct column- and rownames in the returned matrices

Signed-off by: Leo Sendelbach <s8lesend@stud.uni-saarland.de>

util-networks-misc.R

@@ -177,9 +177,11 @@ get.expanded.adjacency = function(network, authors, weighted = FALSE) {
 #' @return the list of adjacency matrices
 get.expanded.adjacency.matrices = function(networks, weighted = FALSE){
 
-    authors = get.author.names.from.networks(networks)
-
-    adjacency.matrices = parallel::mclapply(networks, get.expanded.adjacency, authors, weighted)
+    adjacency.matrices = parallel::mclapply(networks, function(network) {
+        active.authors = igraph::V(network)$name
+        active.authors = sort(active.authors)
+        return (get.expanded.adjacency(network = network, authors = active.authors, weighted = weighted))
+    })
 
     return(adjacency.matrices)
 }