Add min_order argument

NEWS.md

@@ -26,6 +26,7 @@
 * Added `graph_is_eulerian()` and `edge_rank_eulerian()` for eulerian path 
   calculations
 * Added `to_random_spanning_tree()` morpher
+* Added `min_order` argument to `to_components()` morpher
 
 # tidygraph 1.2.3
 

R/morphers.R

@@ -106,9 +106,11 @@ to_split <- function(graph, ..., split_by = NULL) {
 #' @describeIn morphers Split a graph into its separate components. When
 #' unmorphing all data in the subgraphs will get merged back.
 #' @param type The type of component to split into. Either `'weak'` or `'strong'`
+#' @param min_order The minimum order (number of vertices) of the component.
+#' Components below this will not be created
 #' @importFrom igraph decompose
 #' @export
-to_components <- function(graph, type = 'weak') {
+to_components <- function(graph, type = 'weak', min_order = 1) {
   graphs <- decompose(graph, mode = type)
   graphs <- lapply(graphs, as_tbl_graph)
   graphs