Add globalVariables to supress note in devtools::check()

ebmdatalab · Nov 12, 2024 · 36a1130 · 36a1130
1 parent 4a23136
commit 36a1130
Show file tree

Hide file tree

Showing 3 changed files with 17 additions and 3 deletions.
diff --git a/.Rbuildignore b/.Rbuildignore
@@ -8,3 +8,4 @@
 ^docs$
 ^pkgdown$
 ^app.R$
+^rsconnect$
diff --git a/R/server.R b/R/server.R
@@ -124,12 +124,13 @@ app_server <- function(input, output, session) {
           scrollX = TRUE,
           searching = FALSE,
           dom = "Bfrtip",
-          buttons = list("copy", 
+          buttons = list(
+            "copy",
             list(
               extend = "csv",
               title = paste0("selected_", input$dataset, "_codes")
             )
-        ),
+          ),
           deferRender = TRUE,
           scrollY = 400,
           scroller = TRUE
@@ -243,7 +244,7 @@ app_server <- function(input, output, session) {
         paper_bgcolor = "transparent",
         plot_bgcolor = "transparent"
       ) %>%
-      plotly::config(displayModeBar = FALSE) |> 
+      plotly::config(displayModeBar = FALSE) |>
       layout(xaxis = list(fixedrange = TRUE), yaxis = list(fixedrange = TRUE))
   })
 }
diff --git a/R/zzz.R b/R/zzz.R
@@ -1,3 +1,15 @@
 .onLoad <- function(...) {
   S7::methods_register()
 }
+
+utils::globalVariables(c(
+  "start_date",
+  "end_date",
+  "snomed_concept_id",
+  "description",
+  "usage",
+  "icd10_code",
+  "opcs_code",
+  "total_usage",
+  "full_slug"
+))