Running examples in ‘netdiffuseR-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: exposure
> ### Title: Ego exposure
> ### Aliases: exposure
> ### Keywords: univar
> 
> ### ** Examples
> 
> # Calculating the exposure based on Structural Equivalence ------------------
> set.seed(113132)
> graph <- rdiffnet(100, 10)
> 
> SE <- lapply(struct_equiv(graph), "[[", "SE")

 *** caught segfault ***
address (nil), cause 'unknown'

Traceback:
 1: base::.Call(.NAME, ...)
 2: .Call("R_igraph_create", as.numeric(edges) - 1, as.numeric(n),     as.logical(directed), PACKAGE = "igraph")
 3: (function (edges, n = max(edges), directed = TRUE) {    on.exit(.Call("R_igraph_finalizer", PACKAGE = "igraph"))    .Call("R_igraph_create", as.numeric(edges) - 1, as.numeric(n),         as.logical(directed), PACKAGE = "igraph")})(c(1, 1, 7, 1, 9, 1, 17, 1, 26, 1, 34, 1, 40, 1, 51, 1, 79, 1, 2, 2, 3, 2, 4, 2, 5, 2, 6, 2, 21, 2, 23, 2, 45, 2, 46, 2, 60, 2, 76, 2, 82, 2, 85, 2, 88, 2, 90, 2, 96, 2, 13, 3, 19, 3, 8, 5, 39, 5, 10, 6, 31, 6, 22, 7, 43, 7, 64, 7, 67, 7, 27, 8, 55, 9, 68, 9, 99, 9, 24, 10, 11, 11, 12, 11, 16, 11, 35, 11, 56, 11, 78, 11, 32, 12, 41, 12, 72, 12, 73, 12, 77, 12, 81, 12, 93, 12, 97, 12, 18, 13, 28, 13, 30, 13, 49, 13, 50, 13, 36, 16, 37, 16, 29, 17, 44, 17, 86, 17, 20, 18, 33, 18, 42, 18, 92, 19, 58, 20, 69, 20, 74, 24, 52, 25, 38, 26, 59, 26, 83, 27, 62, 31, 70, 34, 53, 36, 47, 39, 54, 40, 57, 40, 84, 41, 75, 43, 25, 44, 98, 44, 80, 48, 48, 49, 100, 56, 71, 57, 94, 58, 87, 59, 89, 61, 66, 63, 65, 65, 63, 79, 14, 80, 95, 84, 91, 87, 15, 92, 61, 100), n = 100L, directed = TRUE)
 4: do.call(old_graph, args)
 5: graph(n = vc, edges, directed = (mode == "directed"))
 6: graph.adjacency.sparse(adjmatrix, mode = mode, weighted = weighted,     diag = diag)
 7: graph_from_adjacency_matrix(graph)
 8: "igraph" %in% class(graph)
 9: is_igraph(graph)
10: igraph::distances(graph_from_adjacency_matrix(graph), mode = mode,     ...)
11: struct_equiv.dgCMatrix(methods::as(graph[[i]], "dgCMatrix"),     v, inf.replace, groupvar, mode, ...)
12: struct_equiv.list(graph$graph, v, inf.replace, groupvar, mode,     ...)
13: struct_equiv(graph)
14: lapply(struct_equiv(graph), "[[", "SE")
An irrecoverable exception occurred. R is aborting now ...
Segmentation fault