diff --git a/R/facet-.R b/R/facet-.R index 8faafc1428..dde17fb340 100644 --- a/R/facet-.R +++ b/R/facet-.R @@ -237,10 +237,10 @@ Facet <- ggproto("Facet", NULL, # Set panel names table$layout$name <- paste( "panel", - rep(seq_len(dim[2]), dim[1]), - rep(seq_len(dim[1]), each = dim[2]), + rep(seq_len(dim[2]), each = dim[1]), + rep(seq_len(dim[1]), dim[2]), sep = "-" - ) + ) # Add spacing between panels spacing <- lapply(