update data example

Author: roninsightrx

DESCRIPTION

@@ -24,3 +24,6 @@ Encoding: UTF-8
 Roxygen: list(markdown = TRUE)
 RoxygenNote: 7.3.3
 Config/testthat/edition: 3
+Depends: 
+    R (>= 3.5)
+LazyData: true

R/data.R

@@ -0,0 +1,3 @@
+#' Example dataset with timepoints in a NONMEM dataset
+#'
+"nm_data_timepoints"

data/nm_data_timepoints.rda

@@ -1,12 +1,9 @@
 test_that("Adding nominal timepoints works", {
 
-  dat <- pharmaair::get_example_dataset("genentech", "test_mod_1")$test_mod_1
-  dat2 <- dat |>
-    dplyr::select(ID, TIME = time, TAD = tad, EVID = evid)
   expect_message(
     dat <- add_nominal_timepoints(
-      dat,
-      "time",
+      nm_data_timepoints,
+      "TIME",
       "NOM_TIME",
       adjust = 0.7,
       verbose = TRUE