From 9cfcaf176046257a7fc8ab095c87bed575390699 Mon Sep 17 00:00:00 2001 From: schochastics Date: Mon, 30 Jun 2025 06:31:14 +0200 Subject: [PATCH 1/2] only check from/to --- R/conversion.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/conversion.R b/R/conversion.R index 2c4998909d6..3b0cb0cb67d 100644 --- a/R/conversion.R +++ b/R/conversion.R @@ -1586,8 +1586,8 @@ graph_from_data_frame <- function(d, directed = TRUE, vertices = NULL) { cli::cli_abort("{.arg d} should contain at least two columns") } - ## Handle if some elements are 'NA' - ensure_no_na(d, "edge data frame") + ## Handle if some elements are 'NA' (first two columns are interpreted as from/to) + ensure_no_na(d[, c(1,2)], "edge data frame") if (!is.null(vertices) && any(is.na(vertices[, 1]))) { cli::cli_warn( From 450457fa0bfe0a4d8bccf0a0aade21c3cccaf2aa Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Kirill=20M=C3=BCller?= Date: Thu, 3 Jul 2025 10:37:53 +0200 Subject: [PATCH 2/2] Update R/conversion.R --- R/conversion.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/conversion.R b/R/conversion.R index 3b0cb0cb67d..439ff7fd7e9 100644 --- a/R/conversion.R +++ b/R/conversion.R @@ -1587,7 +1587,7 @@ graph_from_data_frame <- function(d, directed = TRUE, vertices = NULL) { } ## Handle if some elements are 'NA' (first two columns are interpreted as from/to) - ensure_no_na(d[, c(1,2)], "edge data frame") + ensure_no_na(d[, 1:2], "edge data frame") if (!is.null(vertices) && any(is.na(vertices[, 1]))) { cli::cli_warn(