From 7cb426b418e408e0c5177e5a62cd4b4299ac9f5b Mon Sep 17 00:00:00 2001
From: Jouni Helske <jouni.helske@utu.fi>
Date: Fri, 6 Sep 2024 14:37:57 +0300
Subject: [PATCH] ggplot2::

---
 R/stacked_sequence_plot.R    | 4 ++--
 man/stacked_sequence_plot.Rd | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/R/stacked_sequence_plot.R b/R/stacked_sequence_plot.R
index 7be40939..fa5786f6 100644
--- a/R/stacked_sequence_plot.R
+++ b/R/stacked_sequence_plot.R
@@ -49,10 +49,10 @@
 #' p <- stacked_sequence_plot(
 #'   mhmm_biofam, 
 #'   plots = "both", 
-#'   type="d", 
+#'   type = "d", 
 #'   legend_position = c("right", "right", "right", "none")
 #' )
-#' p & theme(plot.margin = unit(c(1, 1, 0, 2), "mm"))
+#' p & ggplot2::theme(plot.margin = unit(c(1, 1, 0, 2), "mm"))
 #' 
 stacked_sequence_plot <- function(
     x, plots = "obs", type = "d", ids,
diff --git a/man/stacked_sequence_plot.Rd b/man/stacked_sequence_plot.Rd
index ba12aea1..a82eaa1b 100644
--- a/man/stacked_sequence_plot.Rd
+++ b/man/stacked_sequence_plot.Rd
@@ -77,9 +77,9 @@ probable paths of model objects of \code{seqHMM} (e.g., \code{hmm} and \code{mhm
 p <- stacked_sequence_plot(
   mhmm_biofam, 
   plots = "both", 
-  type="d", 
+  type = "d", 
   legend_position = c("right", "right", "right", "none")
 )
-p & theme(plot.margin = unit(c(1, 1, 0, 2), "mm"))
+p & ggplot2::theme(plot.margin = unit(c(1, 1, 0, 2), "mm"))
 
 }