CRAN Package Check Results for Package netdiffuseR

Last updated on 2024-11-27 01:49:56 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.22.6 107.54 350.54 458.08 OK
r-devel-linux-x86_64-debian-gcc 1.22.6 81.25 225.92 307.17 OK
r-devel-linux-x86_64-fedora-clang 1.22.6 793.40 OK
r-devel-linux-x86_64-fedora-gcc 1.22.6 818.66 OK
r-devel-windows-x86_64 1.22.6 116.00 265.00 381.00 OK --no-vignettes
r-patched-linux-x86_64 1.22.6 113.88 327.00 440.88 ERROR
r-release-linux-x86_64 1.22.6 108.42 324.02 432.44 ERROR
r-release-macos-arm64 1.22.6 177.00 NOTE
r-release-macos-x86_64 1.22.6 252.00 NOTE
r-release-windows-x86_64 1.22.6 116.00 266.00 382.00 NOTE --no-vignettes
r-oldrel-macos-arm64 1.22.6 195.00 NOTE
r-oldrel-macos-x86_64 1.22.6 361.00 NOTE
r-oldrel-windows-x86_64 1.22.6 136.00 333.00 469.00 NOTE --no-vignettes

Check Details

Version: 1.22.6
Check: examples
Result: ERROR 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 lagged exposure ----------------------------------------------- > > set.seed(8) > graph <- rdiffnet(20, 4) Warning in (function (graph, p, algorithm = "endpoints", both.ends = FALSE, : The option -copy.first- is set to TRUE. In this case, the first graph will be treated as a baseline, and thus, networks after T=1 will be replaced with T-1. > > expo0 <- exposure(graph) > expo1 <- exposure(graph, lags = 1) > > # These should be equivalent > stopifnot(all(expo0[, -4] == expo1[, -1])) # No stop! > > > # Calculating the exposure based on Structural Equivalence ------------------ > set.seed(113132) > graph <- rdiffnet(100, 4) Warning in (function (graph, p, algorithm = "endpoints", both.ends = FALSE, : The option -copy.first- is set to TRUE. In this case, the first graph will be treated as a baseline, and thus, networks after T=1 will be replaced with T-1. > > SE <- lapply(struct_equiv(graph), "[[", "SE") > SE <- lapply(SE, function(x) { + x <- 1/x + x[!is.finite(x)] <- 0 + x + }) > > > # These three lines are equivalent to: > expo_se2 <- exposure(graph, alt.graph="se", valued=TRUE) > # Notice that we are setting valued=TRUE, but this is not necesary since when > # alt.graph = "se" the function checks this to be setted equal to TRUE > > # Weighted Exposure using degree -------------------------------------------- > eDE <- exposure(graph, attrs=dgr(graph)) > > # Which is equivalent to > graph[["deg"]] <- dgr(graph) > eDE2 <- exposure(graph, attrs="deg") > > # Comparing using incoming edges ------------------------------------------- > eIN <- exposure(graph, outgoing=FALSE) > > # Structral equivalence for different communities --------------------------- > data(medInnovationsDiffNet) > > # Only using 4 time slides, this is for convenience > medInnovationsDiffNet <- medInnovationsDiffNet[, , 1:4] > > # METHOD 1: Using the c.diffnet method: > > # Creating subsets by city > cities <- unique(medInnovationsDiffNet[["city"]]) > > diffnet <- medInnovationsDiffNet[medInnovationsDiffNet[["city"]] == cities[1]] > diffnet[["expo_se"]] <- exposure(diffnet, alt.graph="se", valued=TRUE) *** caught segfault *** address (nil), cause 'unknown' Traceback: 1: .M2C(newTMat(i = c(ij1[, 1], ij2[, 1]), j = c(ij1[, 2], ij2[, 2]), x = if (Generic == "+") c(e1@x, e2@x) else c(e1@x, -e2@x))) 2: .Arith.Csparse(e1, e2, .Generic, class. = "dgCMatrix") 3: d[, ids[, 1]] - d[, ids[, 2]] 4: d[, ids[, 1]] - d[, ids[, 2]] 5: euclidean_distance(gdist) 6: struct_equiv_new(geod, v) 7: struct_equiv.dgCMatrix(methods::as(graph[[i]], "dgCMatrix"), v, inf.replace, groupvar, ...) 8: struct_equiv.list(graph, v, inf.replace, groupvar, ...) 9: struct_equiv(graph, groupvar = groupvar, ...) 10: lapply(struct_equiv(graph, groupvar = groupvar, ...), "[[", "SE") 11: exposure(diffnet, alt.graph = "se", valued = TRUE) An irrecoverable exception occurred. R is aborting now ... Segmentation fault Flavor: r-patched-linux-x86_64

Version: 1.22.6
Check: examples
Result: ERROR 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 lagged exposure ----------------------------------------------- > > set.seed(8) > graph <- rdiffnet(20, 4) Warning in (function (graph, p, algorithm = "endpoints", both.ends = FALSE, : The option -copy.first- is set to TRUE. In this case, the first graph will be treated as a baseline, and thus, networks after T=1 will be replaced with T-1. > > expo0 <- exposure(graph) > expo1 <- exposure(graph, lags = 1) > > # These should be equivalent > stopifnot(all(expo0[, -4] == expo1[, -1])) # No stop! > > > # Calculating the exposure based on Structural Equivalence ------------------ > set.seed(113132) > graph <- rdiffnet(100, 4) Warning in (function (graph, p, algorithm = "endpoints", both.ends = FALSE, : The option -copy.first- is set to TRUE. In this case, the first graph will be treated as a baseline, and thus, networks after T=1 will be replaced with T-1. > > SE <- lapply(struct_equiv(graph), "[[", "SE") > SE <- lapply(SE, function(x) { + x <- 1/x + x[!is.finite(x)] <- 0 + x + }) > > > # These three lines are equivalent to: > expo_se2 <- exposure(graph, alt.graph="se", valued=TRUE) > # Notice that we are setting valued=TRUE, but this is not necesary since when > # alt.graph = "se" the function checks this to be setted equal to TRUE > > # Weighted Exposure using degree -------------------------------------------- > eDE <- exposure(graph, attrs=dgr(graph)) > > # Which is equivalent to > graph[["deg"]] <- dgr(graph) > eDE2 <- exposure(graph, attrs="deg") > > # Comparing using incoming edges ------------------------------------------- > eIN <- exposure(graph, outgoing=FALSE) > > # Structral equivalence for different communities --------------------------- > data(medInnovationsDiffNet) > > # Only using 4 time slides, this is for convenience > medInnovationsDiffNet <- medInnovationsDiffNet[, , 1:4] > > # METHOD 1: Using the c.diffnet method: > > # Creating subsets by city > cities <- unique(medInnovationsDiffNet[["city"]]) > > diffnet <- medInnovationsDiffNet[medInnovationsDiffNet[["city"]] == cities[1]] > diffnet[["expo_se"]] <- exposure(diffnet, alt.graph="se", valued=TRUE) *** caught segfault *** address (nil), cause 'unknown' Traceback: 1: .nextMethod(.Object = .Object, ... = ...) 2: callNextMethod() 3: initialize(value, ...) 4: initialize(value, ...) 5: new("dgTMatrix", Dim = d, Dimnames = dn, i = i, j = j, x = x) 6: newTMat(i = c(ij1[, 1], ij2[, 1]), j = c(ij1[, 2], ij2[, 2]), x = if (Generic == "+") c(e1@x, e2@x) else c(e1@x, -e2@x)) 7: .M2C(newTMat(i = c(ij1[, 1], ij2[, 1]), j = c(ij1[, 2], ij2[, 2]), x = if (Generic == "+") c(e1@x, e2@x) else c(e1@x, -e2@x))) 8: .Arith.Csparse(e1, e2, .Generic, class. = "dgCMatrix") 9: d[, ids[, 1]] - d[, ids[, 2]] 10: d[, ids[, 1]] - d[, ids[, 2]] 11: euclidean_distance(gdist) 12: struct_equiv_new(geod, v) 13: struct_equiv.dgCMatrix(methods::as(graph[[i]], "dgCMatrix"), v, inf.replace, groupvar, ...) 14: struct_equiv.list(graph, v, inf.replace, groupvar, ...) 15: struct_equiv(graph, groupvar = groupvar, ...) 16: lapply(struct_equiv(graph, groupvar = groupvar, ...), "[[", "SE") 17: exposure(diffnet, alt.graph = "se", valued = TRUE) An irrecoverable exception occurred. R is aborting now ... Segmentation fault Flavor: r-release-linux-x86_64

Version: 1.22.6
Check: installed package size
Result: NOTE installed size is 9.9Mb sub-directories of 1Mb or more: doc 2.5Mb libs 5.5Mb Flavors: r-release-macos-arm64, r-release-macos-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64

Version: 1.22.6
Flags: --no-vignettes
Check: installed package size
Result: NOTE installed size is 5.8Mb sub-directories of 1Mb or more: doc 2.5Mb libs 1.5Mb Flavors: r-release-windows-x86_64, r-oldrel-windows-x86_64