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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tbc
> ### Title: Temporal betweenness centrality
> ### Aliases: tbc
> 
> ### ** Examples
> 
> # Create a list of adjacency matrices, plot the corresponding graphs
> # (using the igraph package) and calculate tbc
> 
> A1 <- matrix(c(0,1,0,0,0,0,
+                1,0,1,0,0,0,
+                0,1,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0), ncol=6)
> 
> A2 <- matrix(c(0,0,0,0,0,0,
+                0,0,1,0,0,0,
+                0,1,0,1,1,0,
+                0,0,1,0,0,0,
+                0,0,1,0,0,0,
+                0,0,0,0,0,0), ncol=6)
> 
> A3 <- matrix(c(0,0,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0), ncol=6)
> 
> A4 <- matrix(c(0,1,0,0,0,0,
+                1,0,0,1,0,0,
+                0,0,0,0,0,0,
+                0,1,0,0,0,0,
+                0,0,0,0,0,0,
+                0,0,0,0,0,0), ncol=6)
> 
> library(igraph)

Attaching package: ‘igraph’

The following objects are masked from ‘package:stats’:

    decompose, spectrum

The following object is masked from ‘package:base’:

    union

> par(mfrow=c(2,2))
> 
> Layout <-
+  layout_in_circle(graph_from_adjacency_matrix(A1, mode = "undirected"))
> 
> plot(graph_from_adjacency_matrix(A1, "undirected"), layout=Layout)
> plot(graph_from_adjacency_matrix(A2, "undirected"), layout=Layout)
> plot(graph_from_adjacency_matrix(A3, "undirected"), layout=Layout)
> plot(graph_from_adjacency_matrix(A4, "undirected"), layout=Layout)
> 
> As <- list(A1,A2,A3,A4)
> 
> tbc(As, "M", centrality_evolution=TRUE)
$TBC
[1] 0.00000000 0.06666667 0.03333333 0.00000000 0.00000000 0.00000000

$CentEvo
           [,1]       [,2] [,3] [,4]
[1,] 0.00000000 0.00000000    0    0
[2,] 0.05000000 0.01666667    0    0
[3,] 0.03333333 0.00000000    0    0
[4,] 0.00000000 0.00000000    0    0
[5,] 0.00000000 0.00000000    0    0
[6,] 0.00000000 0.00000000    0    0

> 
> ### Create list of adjacency lists
> Ls <- lapply(seq_along(As), function(i){
+   sapply(1:6, function(j){which(As[[i]][j,]==1)})
+ })
> 
> tbc(Ls, "L", centrality_evolution=TRUE)
Error in .tbc_adjalists(x, startsnapshot = startsnapshot, endsnapshot = endsnapshot,  : 
  Stop! Different number of nodes a different snapshots
Calls: tbc -> .tbc_adjalists
Execution halted