Merge pull request #286 from OHDSI/plot_temporal_symmetry_updated

minor update
OHDSI · Nov 27, 2024 · fbde3d5 · fbde3d5
2 parents e388161 + a41dd3f
commit fbde3d5
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/R/plotSequenceRatios.R b/R/plotSequenceRatios.R
@@ -35,6 +35,9 @@ plotSequenceRatios <- function(result,
                                colours = c("red", "blue"),
                                facet = NULL
                                ){
+
+  rlang::check_installed("ggplot2")
+
   # validate checks
   result <- omopgenerics::validateResultArgument(result)
 

diff --git a/R/plotTemporalSymmetry.R b/R/plotTemporalSymmetry.R
@@ -35,6 +35,9 @@ plotTemporalSymmetry <- function(result,
                                  xlim = c(-12, 12),
                                  colours = c("blue", "red"),
                                  scales = "free") {
+
+  rlang::check_installed("ggplot2")
+
   # checks
   checkInputPlotTemporalSymmetry(result = result,
                                  plotTitle = plotTitle,