diff --git a/R/centrality.R b/R/centrality.R index 0cec52a6a4..715d17ecff 100644 --- a/R/centrality.R +++ b/R/centrality.R @@ -68,10 +68,8 @@ hub.score <- function( weights = NULL, options = arpack_defaults() ) { - # nocov start lifecycle::deprecate_stop("2.0.0", "hub.score()", "hits_scores()") - hub_score(graph = graph, scale = scale, weights = weights, options = options) -} # nocov end +} #' Kleinberg's hub and authority centrality scores. #' @@ -89,15 +87,8 @@ authority.score <- function( weights = NULL, options = arpack_defaults() ) { - # nocov start lifecycle::deprecate_stop("2.0.0", "authority.score()", "hits_scores()") - authority_score( - graph = graph, - scale = scale, - weights = weights, - options = options - ) -} # nocov end +} #' Strength or weighted vertex degree #' diff --git a/R/centralization.R b/R/centralization.R index e0655d7f29..54eda62647 100644 --- a/R/centralization.R +++ b/R/centralization.R @@ -409,7 +409,6 @@ centr_degree_tmax <- function( what = "centr_degree_tmax(loops = 'must be explicit')", details = "The default value (currently `FALSE`) will be dropped in the next release. Add an explicit value for the `loops` argument." ) - loops <- FALSE } # Argument checks diff --git a/R/console.R b/R/console.R index ff898e1bfe..d4a7c8becd 100644 --- a/R/console.R +++ b/R/console.R @@ -58,12 +58,10 @@ igraph.console <- function() { #' @family console #' @export console <- function() { - oldverb <- igraph_opt("verbose") - igraph_options(verbose = "tkconsole") - pb <- .igraph.progress.tkconsole.create(oldverb) - assign(".igraph.pb", pb, envir = asNamespace("igraph")) - .igraph.progress.tkconsole.message("Console started.\n") - invisible() + lifecycle::deprecate_stop( + "3.0.0", + "console()", + ) } .igraph.pb <- NULL diff --git a/R/games.R b/R/games.R index 17d42f7fd9..3b0c8a08ac 100644 --- a/R/games.R +++ b/R/games.R @@ -498,22 +498,12 @@ bipartite.random.game <- function( directed = FALSE, mode = c("out", "in", "all") ) { - # nocov start lifecycle::deprecate_stop( "2.0.0", "bipartite.random.game()", details = "Use sample_bipartite_gnp() or sample_bipartite_gnm()" ) - sample_bipartite( - n1 = n1, - n2 = n2, - type = type, - p = p, - m = m, - directed = directed, - mode = mode - ) -} # nocov end +} #' Generate random graphs using preferential attachment #' @@ -1392,7 +1382,6 @@ sample_degseq <- function( "2.1.0", "sample_degseq(method = 'must be configuration instead of simple')" ) - method <- "configuration" } if (method == "simple.no.multiple") { @@ -1400,7 +1389,6 @@ sample_degseq <- function( "2.1.0", "sample_degseq(method = 'must be fast.heur.simple instead of simple.no.multiple')" ) - method <- "fast.heur.simple" } if (method == "simple.no.multiple.uniform") { @@ -1408,7 +1396,6 @@ sample_degseq <- function( "2.1.0", "sample_degseq(method = 'must be configuration.simple instead of simple.no.multiple.uniform')" ) - method <- "configuration.simple" } # numbers from https://github.com/igraph/igraph/blob/640083c88bf85fd322ff7b748b9b4e16ebe32aa2/include/igraph_constants.h#L94 diff --git a/R/interface.R b/R/interface.R index 9cd977cb47..e589ea2fc3 100644 --- a/R/interface.R +++ b/R/interface.R @@ -479,7 +479,6 @@ el_to_vec <- function(x, call = rlang::caller_env()) { "get_edge_ids(vp = 'supplied as a matrix should be a n times 2 matrix, not 2 times n')", details = "either transpose the matrix with t() or convert it to a data.frame with two columns." ) - c(x) } else if (ncol == 2) { c(t(x)) } else { diff --git a/R/layout.R b/R/layout.R index cd1166e1b5..aa881913a5 100644 --- a/R/layout.R +++ b/R/layout.R @@ -2645,7 +2645,6 @@ layout_components <- function(graph, layout = layout_with_kk, ...) { #' @keywords internal layout.spring <- function(graph, ...) { lifecycle::deprecate_stop("2.1.0", "layout.spring()", "layout_with_fr()") - layout_with_fr(graph) } #' SVD layout, this was removed from igraph @@ -2663,7 +2662,6 @@ layout.spring <- function(graph, ...) { #' @export layout.svd <- function(graph, ...) { lifecycle::deprecate_stop("2.1.0", "layout.svd()", "layout_with_fr()") - layout_with_fr(graph) } #' Grid Fruchterman-Reingold layout, this was removed from igraph @@ -2686,7 +2684,6 @@ layout.fruchterman.reingold.grid <- function(graph, ...) { "layout.fruchterman.reingold.grid()", "layout_with_fr()" ) - layout_with_fr(graph) } #' The DrL graph layout generator diff --git a/R/structural-properties.R b/R/structural-properties.R index 17f85cfbad..1aff1e36d2 100644 --- a/R/structural-properties.R +++ b/R/structural-properties.R @@ -2726,9 +2726,6 @@ bfs <- function( if (lifecycle::is_present(father)) { lifecycle::deprecate_stop("2.2.0", "bfs(father = )", "bfs(parent = )") - if (missing(parent)) { - parent <- father - } } if (length(root) == 1) { @@ -2988,9 +2985,6 @@ dfs <- function( if (lifecycle::is_present(father)) { lifecycle::deprecate_stop("2.2.0", "dfs(father = )", "dfs(parent = )") - if (missing(parent)) { - parent <- father - } } root <- as_igraph_vs(graph, root) - 1 diff --git a/R/tkplot.R b/R/tkplot.R index 1092800a95..0b501c4559 100644 --- a/R/tkplot.R +++ b/R/tkplot.R @@ -325,482 +325,7 @@ assign(".next", 1, .tkplot.env) #' } #' tkplot <- function(graph, canvas.width = 450, canvas.height = 450, ...) { - # nocov start - ensure_igraph(graph) - - # Libraries - requireNamespace("tcltk", quietly = TRUE) || - stop("tcl/tk library not available") - - params <- i.parse.plot.params(graph, list(...)) - - # Use the palette specified by the user (if any) - palette <- params("plot", "palette") - if (!is.null(palette)) { - old_palette <- palette(palette) - on.exit(palette(old_palette), add = TRUE) - } - - # Visual parameters - labels <- params("vertex", "label") - label.color <- .tkplot.convert.color(params("vertex", "label.color")) - label.font <- .tkplot.convert.font( - params("vertex", "label.font"), - params("vertex", "label.family"), - params("vertex", "label.cex") - ) - label.degree <- params("vertex", "label.degree") - label.dist <- params("vertex", "label.dist") - vertex.color <- .tkplot.convert.color(params("vertex", "color")) - vertex.size <- params("vertex", "size") - - # Adjusting size - vertex.size <- i.rescale.vertex( - vertex.size, - c(-canvas.width, canvas.height) / 2, - params("vertex", "relative.size") - ) - - vertex.frame.color <- .tkplot.convert.color(params("vertex", "frame.color")) - - edge.color <- .tkplot.convert.color(params("edge", "color")) - edge.width <- params("edge", "width") - edge.labels <- params("edge", "label") - edge.lty <- params("edge", "lty") - loop.angle <- params("edge", "loop.angle") - arrow.mode <- params("edge", "arrow.mode") - edge.label.font <- .tkplot.convert.font( - params("edge", "label.font"), - params("edge", "label.family"), - params("edge", "label.cex") - ) - edge.label.color <- params("edge", "label.color") - arrow.size <- params("edge", "arrow.size")[1] - curved <- params("edge", "curved") - curved <- rep(curved, length.out = ecount(graph)) - - layout <- unname(params("plot", "layout")) - layout[, 2] <- -layout[, 2] - margin <- params("plot", "margin") - margin <- rep(margin, length.out = 4) - - # the new style parameters can't do this yet - arrow.mode <- i.get.arrow.mode(graph, arrow.mode) - - # Edge line type - edge.lty <- i.tkplot.get.edge.lty(edge.lty) - - # Create window & canvas - top <- tcltk::tktoplevel(background = "lightgrey") - canvas <- tcltk::tkcanvas( - top, - relief = "raised", - width = canvas.width, - height = canvas.height, - borderwidth = 2 - ) - tcltk::tkpack(canvas, fill = "both", expand = 1) - - # Create parameters - vertex.params <- sdf( - vertex.color = vertex.color, - vertex.size = vertex.size, - label.font = label.font, - NROW = vcount(graph) - ) - - params <- list( - vertex.params = vertex.params, - edge.color = edge.color, - label.color = label.color, - labels.state = 1, - edge.width = edge.width, - padding = margin * 300 + max(vertex.size) + 5, - grid = 0, - label.degree = label.degree, - label.dist = label.dist, - edge.labels = edge.labels, - vertex.frame.color = vertex.frame.color, - loop.angle = loop.angle, - edge.lty = edge.lty, - arrow.mode = arrow.mode, - edge.label.font = edge.label.font, - edge.label.color = edge.label.color, - arrow.size = arrow.size, - curved = curved - ) - - # The popup menu - popup.menu <- tcltk::tkmenu(canvas) - tcltk::tkadd( - popup.menu, - "command", - label = "Fit to screen", - command = function() { - tk_fit(tkp.id) - } - ) - - # Different popup menu for vertices - vertex.popup.menu <- tcltk::tkmenu(canvas) - tcltk::tkadd( - vertex.popup.menu, - "command", - label = "Vertex color", - command = function() { - tkp <- .tkplot.get(tkp.id) - vids <- .tkplot.get.selected.vertices(tkp.id) - if (length(vids) == 0) { - return(FALSE) - } - - initialcolor <- tkp$params$vertex.params[vids[1], "vertex.color"] - color <- .tkplot.select.color(initialcolor) - if (color == "") { - return(FALSE) - } # Cancel - - .tkplot.update.vertex.color(tkp.id, vids, color) - } - ) - tcltk::tkadd( - vertex.popup.menu, - "command", - label = "Vertex size", - command = function() { - tkp <- .tkplot.get(tkp.id) - vids <- .tkplot.get.selected.vertices(tkp.id) - if (length(vids) == 0) { - return(FALSE) - } - - initialsize <- tkp$params$vertex.params[1, "vertex.size"] - size <- .tkplot.select.number("Vertex size", initialsize, 1, 20) - if (is.na(size)) { - return(FALSE) - } - - .tkplot.update.vertex.size(tkp.id, vids, size) - } - ) - - # Different popup menu for edges - edge.popup.menu <- tcltk::tkmenu(canvas) - tcltk::tkadd( - edge.popup.menu, - "command", - label = "Edge color", - command = function() { - tkp <- .tkplot.get(tkp.id) - eids <- .tkplot.get.selected.edges(tkp.id) - if (length(eids) == 0) { - return(FALSE) - } - - initialcolor <- ifelse( - length(tkp$params$edge.color) > 1, - tkp$params$edge.color[eids[1]], - tkp$params$edge.color - ) - color <- .tkplot.select.color(initialcolor) - if (color == "") { - return(FALSE) - } # Cancel - - .tkplot.update.edge.color(tkp.id, eids, color) - } - ) - tcltk::tkadd( - edge.popup.menu, - "command", - label = "Edge width", - command = function() { - tkp <- .tkplot.get(tkp.id) - eids <- .tkplot.get.selected.edges(tkp.id) - if (length(eids) == 0) { - return(FALSE) - } - - initialwidth <- ifelse( - length(tkp$params$edge.width) > 1, - tkp$params$edge.width[eids[1]], - tkp$params$edge.width - ) - width <- .tkplot.select.number("Edge width", initialwidth, 1, 10) - if (is.na(width)) { - return(FALSE) - } # Cancel - - .tkplot.update.edge.width(tkp.id, eids, width) - } - ) - - # Create plot object - tkp <- list( - top = top, - canvas = canvas, - graph = graph, - coords = layout, - labels = labels, - params = params, - popup.menu = popup.menu, - vertex.popup.menu = vertex.popup.menu, - edge.popup.menu = edge.popup.menu - ) - tkp.id <- .tkplot.new(tkp) - tcltk::tktitle(top) <- paste("Graph plot", as.character(tkp.id)) - - # The main pull-down menu - main.menu <- tcltk::tkmenu(top) - tcltk::tkadd(main.menu, "command", label = "Close", command = function() { - tk_close(tkp.id, TRUE) - }) - select.menu <- .tkplot.select.menu(tkp.id, main.menu) - tcltk::tkadd(main.menu, "cascade", label = "Select", menu = select.menu) - layout.menu <- .tkplot.layout.menu(tkp.id, main.menu) - tcltk::tkadd(main.menu, "cascade", label = "Layout", menu = layout.menu) - view.menu <- tcltk::tkmenu(main.menu) - tcltk::tkadd(main.menu, "cascade", label = "View", menu = view.menu) - tcltk::tkadd( - view.menu, - "command", - label = "Fit to screen", - command = function() { - tk_fit(tkp.id) - } - ) - tcltk::tkadd( - view.menu, - "command", - label = "Center on screen", - command = function() { - tk_center(tkp.id) - } - ) - tcltk::tkadd(view.menu, "separator") - view.menu.labels <- tcltk::tclVar(1) - view.menu.grid <- tcltk::tclVar(0) - tcltk::tkadd( - view.menu, - "checkbutton", - label = "Labels", - variable = view.menu.labels, - command = function() { - .tkplot.toggle.labels(tkp.id) - } - ) - # grid canvas object not implemented in tcltk (?) :( - # tcltk::tkadd(view.menu, "checkbutton", label="Grid", - # variable=view.menu.grid, command=function() { - # .tkplot.toggle.grid(tkp.id)}) - tcltk::tkadd(view.menu, "separator") - rotate.menu <- tcltk::tkmenu(view.menu) - tcltk::tkadd(view.menu, "cascade", label = "Rotate", menu = rotate.menu) - sapply( - c(-90, -45, -15, -5, -1, 1, 5, 15, 45, 90), - function(deg) { - tcltk::tkadd( - rotate.menu, - "command", - label = paste(deg, "degree"), - command = function() { - tk_rotate(tkp.id, degree = deg) - } - ) - } - ) - export.menu <- tcltk::tkmenu(main.menu) - tcltk::tkadd(main.menu, "cascade", label = "Export", menu = export.menu) - tcltk::tkadd( - export.menu, - "command", - label = "Postscript", - command = function() { - tk_postscript(tkp.id) - } - ) - tcltk::tkconfigure(top, "-menu", main.menu) - - # plot it - .tkplot.create.edges(tkp.id) - .tkplot.create.vertices(tkp.id) - # we would need an update here - tk_fit(tkp.id, canvas.width, canvas.height) - - # Kill myself if window was closed - tcltk::tkbind(top, "", function() tk_close(tkp.id, FALSE)) - - ################################################################### - # The callbacks for interactive editing - ################################################################### - - tcltk::tkitembind(canvas, "vertex||label||edge", "<1>", function(x, y) { - tkp <- .tkplot.get(tkp.id) - canvas <- .tkplot.get(tkp.id, "canvas") - .tkplot.deselect.all(tkp.id) - .tkplot.select.current(tkp.id) - # tcltk::tkitemraise(canvas, "current") - }) - tcltk::tkitembind( - canvas, - "vertex||label||edge", - "", - function(x, y) { - canvas <- .tkplot.get(tkp.id, "canvas") - curtags <- as.character(tcltk::tkgettags(canvas, "current")) - seltags <- as.character(tcltk::tkgettags(canvas, "selected")) - if ("vertex" %in% curtags && "vertex" %in% seltags) { - if ("selected" %in% curtags) { - .tkplot.deselect.current(tkp.id) - } else { - .tkplot.select.current(tkp.id) - } - } else if ("edge" %in% curtags && "edge" %in% seltags) { - if ("selected" %in% curtags) { - .tkplot.deselect.current(tkp.id) - } else { - .tkplot.select.current(tkp.id) - } - } else if ("label" %in% curtags && "vertex" %in% seltags) { - vtag <- curtags[pmatch("v-", curtags)] - tkid <- as.numeric(tcltk::tkfind( - canvas, - "withtag", - paste(sep = "", "vertex&&", vtag) - )) - vtags <- as.character(tcltk::tkgettags(canvas, tkid)) - if ("selected" %in% vtags) { - .tkplot.deselect.vertex(tkp.id, tkid) - } else { - .tkplot.select.vertex(tkp.id, tkid) - } - } else { - .tkplot.deselect.all(tkp.id) - .tkplot.select.current(tkp.id) - } - } - ) - tcltk::tkitembind( - canvas, - "vertex||edge||label", - "", - function(x, y) { - canvas <- .tkplot.get(tkp.id, "canvas") - tcltk::tkitemlower(canvas, "current") - } - ) - tcltk::tkitembind(canvas, "vertex||edge||label", "", function(x, y) { - canvas <- .tkplot.get(tkp.id, "canvas") - tcltk::tkitemraise(canvas, "current") - }) - tcltk::tkbind(canvas, "<3>", function(x, y) { - canvas <- .tkplot.get(tkp.id, "canvas") - tags <- as.character(tcltk::tkgettags(canvas, "current")) - if ("label" %in% tags) { - vtag <- tags[pmatch("v-", tags)] - vid <- as.character(tcltk::tkfind( - canvas, - "withtag", - paste(sep = "", "vertex&&", vtag) - )) - tags <- as.character(tcltk::tkgettags(canvas, vid)) - } - if ("selected" %in% tags) { - # The selection is active - } else { - # Delete selection, single object - .tkplot.deselect.all(tkp.id) - .tkplot.select.current(tkp.id) - } - tags <- as.character(tcltk::tkgettags(canvas, "selected")) - ## TODO: what if different types of objects are selected - if ("vertex" %in% tags || "label" %in% tags) { - menu <- .tkplot.get(tkp.id, "vertex.popup.menu") - } else if ("edge" %in% tags) { - menu <- .tkplot.get(tkp.id, "edge.popup.menu") - } else { - menu <- .tkplot.get(tkp.id, "popup.menu") - } - x <- as.integer(x) + as.integer(tcltk::tkwinfo("rootx", canvas)) - y <- as.integer(y) + as.integer(tcltk::tkwinfo("rooty", canvas)) - tcltk::.Tcl(paste("tk_popup", tcltk::.Tcl.args(menu, x, y))) - }) - if (tkp$params$label.dist == 0) { - tobind <- "vertex||label" - } else { - tobind <- "vertex" - } - tcltk::tkitembind(canvas, tobind, "", function(x, y) { - tkp <- .tkplot.get(tkp.id) - x <- as.numeric(x) - y <- as.numeric(y) - width <- as.numeric(tcltk::tkwinfo("width", tkp$canvas)) - height <- as.numeric(tcltk::tkwinfo("height", tkp$canvas)) - if (x < 10) { - x <- 10 - } - if (x > width - 10) { - x <- width - 10 - } - if (y < 10) { - y <- 10 - } - if (y > height - 10) { - y <- height - 10 - } - - # get the id - tags <- as.character(tcltk::tkgettags(tkp$canvas, "selected")) - id <- as.numeric(strsplit(tags[pmatch("v-", tags)], "-", fixed = TRUE)[[1]][ - 2 - ]) - if (is.na(id)) { - return() - } - # move the vertex - .tkplot.set.vertex.coords(tkp.id, id, x, y) - .tkplot.update.vertex(tkp.id, id, x, y) - }) - if (tkp$params$label.dist != 0) { - tcltk::tkitembind(canvas, "label", "", function(x, y) { - tkp <- .tkplot.get(tkp.id) - x <- as.numeric(x) - y <- as.numeric(y) - # get the id - tags <- as.character(tcltk::tkgettags(tkp$canvas, "selected")) - id <- as.numeric(strsplit(tags[pmatch("v-", tags)], "-", fixed = TRUE)[[ - 1 - ]][2]) - if (is.na(id)) { - return() - } - phi <- pi + atan2(tkp$coords[id, 2] - y, tkp$coords[id, 1] - x) - .tkplot.set.label.degree(tkp.id, id, phi) - .tkplot.update.label(tkp.id, id, tkp$coords[id, 1], tkp$coords[id, 2]) - }) - } - - # We don't need these any more, they are stored in the environment - rm( - tkp, - params, - layout, - vertex.color, - edge.color, - top, - canvas, - main.menu, - layout.menu, - view.menu, - export.menu, - label.font, - label.degree, - vertex.frame.color, - vertex.params - ) - - tkp.id - # nocov end + lifecycle::deprecate_stop("3.0.0", "tkplot()") } ################################################################### diff --git a/revdep/README.md b/revdep/README.md index 56bff1024a..2a679c705a 100644 --- a/revdep/README.md +++ b/revdep/README.md @@ -1,11 +1,12 @@ # Revdeps -## Failed to check (10) +## Failed to check (11) |package |version |error |warning |note | |:-----------|:-------|:-----|:-------|:----| |blavaan |0.5-10 |1 | | | |caugi |1.2.0 |1 | | | +|ClustAssess |? | | | | |deepSTRAPP |? | | | | |ggpicrust2 |? | | | | |MiscMetabar |? | | | | @@ -15,23 +16,33 @@ |spopt |0.1.2 |1 | | | |streamDAG |? | | | | -## New problems (15) +## New problems (25) -|package |version |error |warning |note | -|:----------|:-------|:------|:-------|:------| -|[comato](problems.md#comato)|1.1 |__+1__ | | | -|[cranly](problems.md#cranly)|0.6.0 |__+1__ | | | -|[dci](problems.md#dci)|1.0.3 |__+3__ | | | -|[degreenet](problems.md#degreenet)|1.3-6 |__+1__ | | | -|[ECoL](problems.md#ecol)|0.3.0 |__+2__ | | | -|[FrF2](problems.md#frf2)|2.3-4 | | |__+1__ | -|[ggraph](problems.md#ggraph)|2.2.2 |__+2__ | | | -|[GoodFitSBM](problems.md#goodfitsbm)|0.0.1 |__+1__ | | | -|[migraph](problems.md#migraph)|1.6.2 |__+1__ | | | -|[nat](problems.md#nat)|1.8.25 |__+3__ | | | -|[qgraph](problems.md#qgraph)|1.9.8 |__+1__ | | | -|[R6causal](problems.md#r6causal)|0.8.3 | |__+1__ | | -|[scistreer](problems.md#scistreer)|1.2.1 |__+1__ | |1 | -|[tidygraph](problems.md#tidygraph)|1.3.1 |__+2__ | |1 | -|[vkR](problems.md#vkr)|0.2 | |__+1__ | | +|package |version |error |warning |note | +|:----------|:--------|:------|:-------|:------| +|[Boptbd](problems.md#boptbd)|1.0.7 |__+1__ | | | +|[c3net](problems.md#c3net)|1.1.1.1 |__+1__ | | | +|[Cascade](problems.md#cascade)|2.3 | |__+1__ | | +|[comato](problems.md#comato)|1.1 |__+1__ | | | +|[cranly](problems.md#cranly)|0.6.0 |__+1__ | | | +|[dci](problems.md#dci)|1.0.3 |__+3__ | | | +|[degreenet](problems.md#degreenet)|1.3-6 |__+1__ | | | +|[DiagrammeR](problems.md#diagrammer)|1.0.11 |__+2__ | | | +|[ECoL](problems.md#ecol)|0.3.0 |__+2__ | | | +|[FrF2](problems.md#frf2)|2.3-4 | | |__+1__ | +|[ggm](problems.md#ggm)|2.5.2 |__+1__ | | | +|[ggraph](problems.md#ggraph)|2.2.2 |__+2__ | | | +|[GoodFitSBM](problems.md#goodfitsbm)|0.0.1 |__+1__ | | | +|[jewel](problems.md#jewel)|2.0.2 |__+1__ | | | +|[migraph](problems.md#migraph)|1.6.2 |__+1__ | | | +|[nat](problems.md#nat)|1.8.25 |__+3__ | | | +|[optbdmaeAT](problems.md#optbdmaeat)|1.0.2 |__+1__ | | | +|[optrcdmaeAT](problems.md#optrcdmaeat)|1.0.1 |__+1__ | | | +|[qgraph](problems.md#qgraph)|1.9.8 |__+1__ | | | +|[R6causal](problems.md#r6causal)|0.8.3 | |__+1__ | | +|[rSpectral](problems.md#rspectral)|1.0.0.14 |__+1__ | | | +|[scistreer](problems.md#scistreer)|1.2.1 |__+1__ | |1 | +|[sfnetworks](problems.md#sfnetworks)|0.6.5 |__+1__ | | | +|[tidygraph](problems.md#tidygraph)|1.3.1 |__+2__ | |1 | +|[vkR](problems.md#vkr)|0.2 | |__+1__ | | diff --git a/revdep/cran.md b/revdep/cran.md index 2f5dfaab7e..ee83bebdb5 100644 --- a/revdep/cran.md +++ b/revdep/cran.md @@ -2,14 +2,23 @@ We checked 2283 reverse dependencies (2281 from CRAN + 2 from Bioconductor), comparing R CMD check results across CRAN and dev versions of this package. - * We saw 15 new problems - * We failed to check 8 packages + * We saw 25 new problems + * We failed to check 9 packages Issues with CRAN packages are summarised below. ### New problems (This reports the first line of each new failure) +* Boptbd + checking examples ... ERROR + +* c3net + checking examples ... ERROR + +* Cascade + checking whether package ‘Cascade’ can be installed ... WARNING + * comato checking examples ... ERROR @@ -24,6 +33,10 @@ Issues with CRAN packages are summarised below. * degreenet checking examples ... ERROR +* DiagrammeR + checking examples ... ERROR + checking tests ... ERROR + * ECoL checking examples ... ERROR checking tests ... ERROR @@ -31,6 +44,9 @@ Issues with CRAN packages are summarised below. * FrF2 checking tests ... NOTE +* ggm + checking examples ... ERROR + * ggraph checking examples ... ERROR checking re-building of vignette outputs ... ERROR @@ -38,6 +54,9 @@ Issues with CRAN packages are summarised below. * GoodFitSBM checking examples ... ERROR +* jewel + checking examples ... ERROR + * migraph checking tests ... ERROR @@ -46,15 +65,27 @@ Issues with CRAN packages are summarised below. checking tests ... ERROR checking re-building of vignette outputs ... ERROR +* optbdmaeAT + checking examples ... ERROR + +* optrcdmaeAT + checking examples ... ERROR + * qgraph checking examples ... ERROR * R6causal checking whether package ‘R6causal’ can be installed ... WARNING +* rSpectral + checking tests ... ERROR + * scistreer checking examples ... ERROR +* sfnetworks + checking tests ... ERROR + * tidygraph checking examples ... ERROR checking tests ... ERROR @@ -64,11 +95,12 @@ Issues with CRAN packages are summarised below. ### Failed to check -* blavaan (NA) -* caugi (NA) -* deepSTRAPP (NA) -* ggpicrust2 (NA) -* rsat (NA) -* scAnnotate (NA) -* spopt (NA) -* streamDAG (NA) +* blavaan (NA) +* caugi (NA) +* ClustAssess (NA) +* deepSTRAPP (NA) +* ggpicrust2 (NA) +* rsat (NA) +* scAnnotate (NA) +* spopt (NA) +* streamDAG (NA) diff --git a/revdep/failures.md b/revdep/failures.md index 8322cef76f..d8fb7ac6a9 100644 --- a/revdep/failures.md +++ b/revdep/failures.md @@ -2030,6 +2030,7 @@ ERROR: compilation failed for package ‘blavaan’ ``` + # caugi (1.2.0) * GitHub: @@ -2086,6 +2087,164 @@ ERROR: configuration failed for package ‘caugi’ ``` + +# ClustAssess (1.1.0) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "ClustAssess")` for more info + +## Error before installation + +### Devel + +``` +* using log directory ‘/tmp/workdir/ClustAssess/new/ClustAssess.Rcheck’ +* using R version 4.5.1 (2025-06-13) +* using platform: x86_64-pc-linux-gnu +* R was compiled by + gcc (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0 + GNU Fortran (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0 +* running under: Ubuntu 24.04.3 LTS +* using session charset: UTF-8 +* using option ‘--no-manual’ +* checking for file ‘ClustAssess/DESCRIPTION’ ... OK +* checking extension type ... Package +* this is package ‘ClustAssess’ version ‘1.1.0’ +* package encoding: UTF-8 +* checking package namespace information ... OK +* checking package dependencies ... INFO +Package suggested but not available for checking: ‘monocle3’ +* checking if this is a source package ... OK +* checking if there is a namespace ... OK +* checking for executable files ... OK +* checking for hidden files and directories ... OK +* checking for portable file names ... OK +* checking for sufficient/correct file permissions ... OK +* checking whether package ‘ClustAssess’ can be installed ... OK +* used C++ compiler: ‘g++ (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0’ +* checking installed package size ... INFO + installed size is 5.4Mb + sub-directories of 1Mb or more: + R 1.5Mb + libs 3.7Mb +* checking package directory ... OK +* checking DESCRIPTION meta-information ... OK +* checking top-level files ... OK +* checking for left-over files ... OK +* checking index information ... OK +* checking package subdirectories ... OK +* checking code files for non-ASCII characters ... OK +* checking R files for syntax errors ... OK +* checking whether the package can be loaded ... OK +* checking whether the package can be loaded with stated dependencies ... OK +* checking whether the package can be unloaded cleanly ... OK +* checking whether the namespace can be loaded with stated dependencies ... OK +* checking whether the namespace can be unloaded cleanly ... OK +* checking loading without being on the library search path ... OK +* checking dependencies in R code ... OK +* checking S3 generic/method consistency ... OK +* checking replacement functions ... OK +* checking foreign function calls ... OK +* checking R code for possible problems ... OK +* checking Rd files ... OK +* checking Rd metadata ... OK +* checking Rd cross-references ... OK +* checking for missing documentation entries ... OK +* checking for code/documentation mismatches ... OK +* checking Rd \usage sections ... OK +* checking Rd contents ... OK +* checking for unstated dependencies in examples ... OK +* checking line endings in C/C++/Fortran sources/headers ... OK +* checking compiled code ... OK +* checking examples ... OK +* checking for unstated dependencies in ‘tests’ ... OK +* checking tests ... OK + Running ‘testthat.R’ +* DONE +Status: OK + + + + + +``` +### CRAN + +``` +* using log directory ‘/tmp/workdir/ClustAssess/old/ClustAssess.Rcheck’ +* using R version 4.5.1 (2025-06-13) +* using platform: x86_64-pc-linux-gnu +* R was compiled by + gcc (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0 + GNU Fortran (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0 +* running under: Ubuntu 24.04.3 LTS +* using session charset: UTF-8 +* using option ‘--no-manual’ +* checking for file ‘ClustAssess/DESCRIPTION’ ... OK +* checking extension type ... Package +* this is package ‘ClustAssess’ version ‘1.1.0’ +* package encoding: UTF-8 +* checking package namespace information ... OK +* checking package dependencies ... INFO +Package suggested but not available for checking: ‘monocle3’ +* checking if this is a source package ... OK +* checking if there is a namespace ... OK +* checking for executable files ... OK +* checking for hidden files and directories ... OK +* checking for portable file names ... OK +* checking for sufficient/correct file permissions ... OK +* checking whether package ‘ClustAssess’ can be installed ... OK +* used C++ compiler: ‘g++ (Ubuntu 13.3.0-6ubuntu2~24.04) 13.3.0’ +* checking installed package size ... INFO + installed size is 5.4Mb + sub-directories of 1Mb or more: + R 1.5Mb + libs 3.7Mb +* checking package directory ... OK +* checking DESCRIPTION meta-information ... OK +* checking top-level files ... OK +* checking for left-over files ... OK +* checking index information ... OK +* checking package subdirectories ... OK +* checking code files for non-ASCII characters ... OK +* checking R files for syntax errors ... OK +* checking whether the package can be loaded ... OK +* checking whether the package can be loaded with stated dependencies ... OK +* checking whether the package can be unloaded cleanly ... OK +* checking whether the namespace can be loaded with stated dependencies ... OK +* checking whether the namespace can be unloaded cleanly ... OK +* checking loading without being on the library search path ... OK +* checking dependencies in R code ... OK +* checking S3 generic/method consistency ... OK +* checking replacement functions ... OK +* checking foreign function calls ... OK +* checking R code for possible problems ... OK +* checking Rd files ... OK +* checking Rd metadata ... OK +* checking Rd cross-references ... OK +* checking for missing documentation entries ... OK +* checking for code/documentation mismatches ... OK +* checking Rd \usage sections ... OK +* checking Rd contents ... OK +* checking for unstated dependencies in examples ... OK +* checking line endings in C/C++/Fortran sources/headers ... OK +* checking compiled code ... OK +* checking examples ... OK +* checking for unstated dependencies in ‘tests’ ... OK +* checking tests ... OK + Running ‘testthat.R’ +* DONE +Status: OK + + + + + +``` + # deepSTRAPP (1.0.0) * GitHub: @@ -2256,6 +2415,7 @@ Status: OK ``` + # ggpicrust2 (2.5.14) * GitHub: @@ -2430,6 +2590,7 @@ Status: OK ``` + # MiscMetabar (NA) * : @@ -2458,6 +2619,7 @@ Run `revdepcheck::cloud_details(, "MiscMetabar")` for more info ``` + # richCluster (NA) * : @@ -2486,6 +2648,7 @@ Run `revdepcheck::cloud_details(, "richCluster")` for more info ``` + # rsat (0.1.21) * GitHub: @@ -2542,6 +2705,7 @@ ERROR: lazy loading failed for package ‘rsat’ ``` + # scAnnotate (0.3) * Email: @@ -2597,6 +2761,7 @@ ERROR: lazy loading failed for package ‘scAnnotate’ ``` + # spopt (0.1.2) * GitHub: @@ -2693,6 +2858,7 @@ ERROR: compilation failed for package ‘spopt’ ``` + # streamDAG (1.6) * Email: diff --git a/revdep/problems.md b/revdep/problems.md index d70e45da85..36351d850f 100644 --- a/revdep/problems.md +++ b/revdep/problems.md @@ -1,3 +1,97 @@ +# Boptbd (1.0.7) + +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "Boptbd")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + > ### Title: Creates the graphical layout of resultant optimal design + > ### Aliases: graphoptBbd + > ### Keywords: Graphical layout + > + > ### ** Examples + > + > ##To create the graphical layout of the D-optimal block design + > ##obtained using the treatment exchange algorithm for + > trt.N <- 10 #Number of treatments + > blk.N <- 10 #Number of blocks + > alpha <- 0.1 #alpha value + > beta <- 0.1 #beta value + > OptdesF <- rbind(1:10, c(2:10,1)) #Bayesian A-optimal block design (loop design) + > + > graphoptBbd(trt.N = 10, blk.N = 10, alpha = 0.1, beta = 0.1, OptdesF, Optcrit = "A") + Error: + ! `tkplot()` was deprecated in igraph 3.0.0 and is now defunct. + Backtrace: + ▆ + 1. └─Boptbd::graphoptBbd(...) + 2. └─igraph::tkplot(...) + 3. └─lifecycle::deprecate_stop("3.0.0", "tkplot()") + 4. └─lifecycle:::deprecate_stop0(msg) + 5. └─rlang::cnd_signal(...) + Execution halted + ``` + +# c3net (1.1.1.1) + +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "c3net")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + Running examples in ‘c3net-Ex.R’ failed + The error most likely occurred in: + + > ### Name: c3net + > ### Title: All in one function to infer network with C3NET + > ### Aliases: c3net + > ### Keywords: misc + > + > ### ** Examples + > + > data(expdata) + > data(truenet) + > + > net <- c3net(expdata, network=TRUE) + Error: + ! `tkplot()` was deprecated in igraph 3.0.0 and is now defunct. + Backtrace: + ▆ + 1. └─c3net::c3net(expdata, network = TRUE) + 2. └─c3net::netplot(net) + 3. └─igraph::tkplot(z) + 4. └─lifecycle::deprecate_stop("3.0.0", "tkplot()") + 5. └─lifecycle:::deprecate_stop0(msg) + 6. └─rlang::cnd_signal(...) + Execution halted + ``` + +# Cascade (2.3) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "Cascade")` for more info + +## Newly broken + +* checking whether package ‘Cascade’ can be installed ... WARNING + ``` + Found the following significant warnings: + Warning: replacing previous import ‘igraph::circulant’ by ‘magic::circulant’ when loading ‘Cascade’ + See ‘/tmp/workdir/Cascade/new/Cascade.Rcheck/00install.out’ for details. + ``` + # comato (1.1) * Email: @@ -214,6 +308,76 @@ Run `revdepcheck::cloud_details(, "degreenet")` for more info Execution halted ``` +# DiagrammeR (1.0.11) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "DiagrammeR")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + > # for all nodes in the graph + > graph %>% + + get_leverage_centrality() + Error in `purrr::map()`: + ℹ In index: 1. + Caused by error in `igraph::neighbors()`: + ! `vid` must specify exactly one vertex + Backtrace: + ▆ + 1. ├─graph %>% get_leverage_centrality() + 2. ├─DiagrammeR::get_leverage_centrality(.) + 3. │ ├─... %>% unlist() + 4. │ └─purrr::map(...) + 5. │ └─purrr:::map_("list", .x, .f, ..., .progress = .progress) + 6. │ ├─purrr:::with_indexed_errors(...) + 7. │ │ └─base::withCallingHandlers(...) + 8. │ ├─purrr:::call_with_cleanup(...) + 9. │ └─DiagrammeR (local) .f(.x[[i]], ...) + 10. │ ├─base::mean(...) + 11. │ └─igraph::neighbors(ig_graph, degree_vals) + 12. │ └─igraph:::neighbors_impl(graph = graph, vid = v, mode = mode) + 13. │ └─cli::cli_abort(...) + 14. │ └─rlang::abort(...) + 15. └─base::unlist(.) + Execution halted + ``` + +* checking tests ... ERROR + ``` + ... + 'test-add_graphs.R:3:1', 'test-add_graphs.R:223:1', + 'test-add_graphs.R:1706:1', 'test-add_nodes_edges_from_table.R:268:1', + 'test-cache_attrs.R:3:1', 'test-colorize_nodes_edges.R:219:1', + 'test-create_combine_nodes.R:3:1', 'test-create_subgraph.R:3:1', + 'test-delete_node_edge.R:255:1', + 'test-get_select_last_nodes_edges_created.R:75:1', + 'test-graph_series.R:323:1', 'test-graph_validation.R:3:1', + 'test-graph_validation.R:234:1', 'test-graph_validation.R:292:1', + 'test-render_graph.R:3:3', 'test-selections.R:1:1', + 'test-set_get_node_edge_attrs.R:236:1', 'test-similarity_measures.R:1:1', + 'test-similarity_measures.R:113:1', 'test-transform_graph.R:98:1', + 'test-transform_graph.R:262:1', 'test-trav_out_until.R:1:1', + 'test-traversals.R:3:1' + + ══ Failed tests ════════════════════════════════════════════════════════════════ + ── Error ('test-get_node_calculations.R:255:3'): Getting leverage centrality is possible ── + + Error in `purrr::map(seq_along(degree_vals), function(x) { mean((degree_vals[x] - degree_vals[igraph::neighbors(ig_graph, degree_vals)])/(degree_vals[x] + degree_vals[igraph::neighbors(ig_graph, degree_vals)])) })`: i In index: 1. + Caused by error in `igraph::neighbors()`: + ! `vid` must specify exactly one vertex + + [ FAIL 1 | WARN 3 | SKIP 24 | PASS 1796 ] + Error: + ! Test failures. + Execution halted + ``` + # ECoL (0.3.0) * GitHub: @@ -323,6 +487,45 @@ Run `revdepcheck::cloud_details(, "FrF2")` for more info Comparing ‘pbtest.Rout’ to ‘pbtest.Rout.save’ ... OK ``` +# ggm (2.5.2) + +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "ggm")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + + 0,1,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,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,1,1,0,0,0,0,0,0,0,0, + + 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0, + + 0,0,0,0,1,0,1,0,1,1,0,0,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,0,0,1,0,1,0,0,0,0, + + 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, + + 1,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0, + + 0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,0),16,16,byrow=TRUE) + > M <- c(3,5,6,15,16) + > C <- c(4,7) + > AG(ex, M, C, plot = TRUE) + Error: + ! `tkplot()` was deprecated in igraph 3.0.0 and is now defunct. + Backtrace: + ▆ + 1. └─ggm::AG(ex, M, C, plot = TRUE) + 2. └─ggm (local) plotfun(fr, ...) + 3. └─igraph::tkplot(...) + 4. └─lifecycle::deprecate_stop("3.0.0", "tkplot()") + 5. └─lifecycle:::deprecate_stop0(msg) + 6. └─rlang::cnd_signal(...) + Execution halted + ``` + # ggraph (2.2.2) * GitHub: @@ -433,6 +636,46 @@ Run `revdepcheck::cloud_details(, "GoodFitSBM")` for more info Execution halted ``` +# jewel (2.0.2) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "jewel")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + The error most likely occurred in: + + > ### Name: constructWeights + > ### Title: Construct weights for _jewel_ minimization problem from prior + > ### information on vertices degrees. + > ### Aliases: constructWeights + > + > ### ** Examples + > + > { + + K <- 3 + + p <- 50 + + n <- 20 + + data <- generateData_rewire(K = K, p = p, n = n, ncores = 1, verbose = FALSE) + + G_list_true <- data$Graphs + + true_degrees <- rowSums(G_list_true[[1]]) + + cut <- sort(true_degrees, decreasing = TRUE)[ceiling(p * 0.03)] + + apriori_hubs <- ifelse(true_degrees >= cut, 10, 1) + + W <- constructWeights(apriori_hubs, K = K) + + } + Error in rewire_impl(rewire = graph, n = niter, mode = mode) : + The value 2.4500000000000002 is not representable as an integer. Invalid value + Source: rinterface_extra.c:83 + Calls: generateData_rewire ... do_call -> eval -> eval -> -> rewire_impl + Execution halted + ``` + # migraph (1.6.2) * GitHub: @@ -573,6 +816,84 @@ Run `revdepcheck::cloud_details(, "nat")` for more info Execution halted ``` +# optbdmaeAT (1.0.2) + +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "optbdmaeAT")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + > ### Name: graphoptbd.mae + > ### Title: Creates the graphical layout of resultant optimal design + > ### Aliases: graphoptbd.mae + > ### Keywords: Graphical layout + > + > ### ** Examples + > + > ##To create the graphical layout of the D-optimal block design + > ##obtained using the treatment exchange algorithm for + > trt.N <- 10 #Number of treatments + > blk.N <- 10 #Number of blocks + > theta <- 0.2 #theta value + > OptdesF <- rbind(1:10, c(2:10,1)) #D-optimal design (loop design) + > + > graphoptbd.mae(trt.N = 10, blk.N = 10, theta = 0.2, OptdesF, Optcrit = "D", cbVal2 = 0) + Error: + ! `tkplot()` was deprecated in igraph 3.0.0 and is now defunct. + Backtrace: + ▆ + 1. └─optbdmaeAT::graphoptbd.mae(...) + 2. └─igraph::tkplot(...) + 3. └─lifecycle::deprecate_stop("3.0.0", "tkplot()") + 4. └─lifecycle:::deprecate_stop0(msg) + 5. └─rlang::cnd_signal(...) + Execution halted + ``` + +# optrcdmaeAT (1.0.1) + +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "optrcdmaeAT")` for more info + +## Newly broken + +* checking examples ... ERROR + ``` + ... + > + > ### ** Examples + > + > ##To create the graphical layout of the D-optimal row-column design + > ##obtained using the treatment exchange algorithm for + > + > trt.N <- 10 #Number of treatments + > + > col.N <- 10 #Number of arrays + > + > theta <- 0.2 #theta value + > + > OptdesF <- rbind(1:10, c(2:10, 1)) #D-optimal design (loop design) + > + > graphoptrcd.mae(trt.N = 10, col.N = 10, theta = 0.2, OptdesF, Optcrit = "D", cbVal2 = 0) + Error: + ! `tkplot()` was deprecated in igraph 3.0.0 and is now defunct. + Backtrace: + ▆ + 1. └─optrcdmaeAT::graphoptrcd.mae(...) + 2. └─igraph::tkplot(...) + 3. └─lifecycle::deprecate_stop("3.0.0", "tkplot()") + 4. └─lifecycle:::deprecate_stop0(msg) + 5. └─rlang::cnd_signal(...) + Execution halted + ``` + # qgraph (1.9.8) * GitHub: @@ -631,6 +952,46 @@ Run `revdepcheck::cloud_details(, "R6causal")` for more info See ‘/tmp/workdir/R6causal/new/R6causal.Rcheck/00install.out’ for details. ``` +# rSpectral (1.0.0.14) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "rSpectral")` for more info + +## Newly broken + +* checking tests ... ERROR + ``` + ... + This graph was created by an old(er) igraph version. + i Call `igraph::upgrade_graph()` on it to use with the current igraph version. + For now we convert it on the fly... + Saving _problems/test-igraph-19.R + Saving _problems/test-igraph-26.R + [ FAIL 2 | WARN 4 | SKIP 0 | PASS 10 ] + + ══ Failed tests ════════════════════════════════════════════════════════════════ + ── Failure ('test-igraph.R:19:3'): membership fix_neig=0 is correct ──────────── + Expected `c$modularity` to equal `exp_mod10`. + Differences: + `actual`: 0.432 + `expected`: 0.408 + + ── Failure ('test-igraph.R:26:3'): membership fix_neig=1 is correct ──────────── + Expected `c$modularity` to equal `exp_mod11`. + Differences: + `actual`: 0.3758 + `expected`: 0.3776 + + + [ FAIL 2 | WARN 4 | SKIP 0 | PASS 10 ] + Error: + ! Test failures. + Execution halted + ``` + # scistreer (1.2.1) * GitHub: @@ -679,6 +1040,46 @@ Run `revdepcheck::cloud_details(, "scistreer")` for more info All declared Imports should be used. ``` +# sfnetworks (0.6.5) + +* GitHub: +* Email: +* GitHub mirror: + +Run `revdepcheck::cloud_details(, "sfnetworks")` for more info + +## Newly broken + +* checking tests ... ERROR + ``` + ... + [ FAIL 1 | WARN 0 | SKIP 0 | PASS 276 ] + + ══ Failed tests ════════════════════════════════════════════════════════════════ + ── Error ('test_paths.R:41:3'): Only the first from argument + is used for shortest paths calculations ── + Error in `all_shortest_paths(x, from, to, weights = weights, ...)`: `from` must specify exactly one vertex + Backtrace: + ▆ + 1. ├─testthat::expect_warning(...) at test_paths.R:41:3 + 2. │ └─testthat:::quasi_capture(...) + 3. │ ├─testthat (local) .capture(...) + 4. │ │ └─base::withCallingHandlers(...) + 5. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) + 6. ├─sfnetworks::st_network_paths(...) + 7. └─sfnetworks:::st_network_paths.sfnetwork(...) + 8. └─sfnetworks:::get_all_shortest_paths(...) + 9. └─igraph::all_shortest_paths(x, from, to, weights = weights, ...) + 10. └─igraph:::get_all_shortest_paths_dijkstra_impl(...) + 11. └─cli::cli_abort(...) + 12. └─rlang::abort(...) + + [ FAIL 1 | WARN 0 | SKIP 0 | PASS 276 ] + Error: + ! Test failures. + Execution halted + ``` + # tidygraph (1.3.1) * GitHub: