From 4e0317d6eb6854185f25e85866661771f7ce212f Mon Sep 17 00:00:00 2001
From: cecicampanile <campanile.cecilia@gmail.com>
Date: Tue, 28 Jan 2025 13:07:32 +0000
Subject: [PATCH] add donttest

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

diff --git a/R/tableOmopSnapshot.R b/R/tableOmopSnapshot.R
index 7de02a73..164f9077 100644
--- a/R/tableOmopSnapshot.R
+++ b/R/tableOmopSnapshot.R
@@ -5,6 +5,7 @@
 #' @return A gt or flextable object with the summarised data.
 #' @export
 #' @examples
+#' \donttest{
 #' cdm <- mockOmopSketch(numberIndividuals = 10)
 #'
 #' result <- summariseOmopSnapshot(cdm)
@@ -13,6 +14,7 @@
 #'   tableOmopSnapshot()
 #'
 #' PatientProfiles::mockDisconnect(cdm)
+#' }
 tableOmopSnapshot <- function(result,
                               type = "gt") {
   # initial checks
diff --git a/man/tableOmopSnapshot.Rd b/man/tableOmopSnapshot.Rd
index 2cb78528..6633dc17 100644
--- a/man/tableOmopSnapshot.Rd
+++ b/man/tableOmopSnapshot.Rd
@@ -18,6 +18,7 @@ A gt or flextable object with the summarised data.
 Create a visual table from a summarise_omop_snapshot result.
 }
 \examples{
+\donttest{
 cdm <- mockOmopSketch(numberIndividuals = 10)
 
 result <- summariseOmopSnapshot(cdm)
@@ -27,3 +28,4 @@ result |>
 
 PatientProfiles::mockDisconnect(cdm)
 }
+}