setting correct out list
This commit is contained in:
parent
76e60b3202
commit
cc277dab37
1 changed files with 1 additions and 0 deletions
|
|
@ -88,6 +88,7 @@ lbm_res <- future_lapply(seq_along(lbm_matrices), function(mat_idx) {
|
|||
start_time <- Sys.time()
|
||||
fit <- estimateBipartiteSBM(netMat = lbm_matrices[[mat_idx]], estimOptions = list(plot = 0))
|
||||
stop_time <- Sys.time()
|
||||
out_list <- list(fit = fit, time = time)
|
||||
return(out_list)
|
||||
}, future.seed = TRUE)
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue