diff --git a/R/dlabel.R b/R/dlabel.R
index ac70a26..1c71d0b 100644
--- a/R/dlabel.R
+++ b/R/dlabel.R
@@ -37,7 +37,7 @@
 #' set.seed(123)
 #' dl.test <- data.frame(id = sample(1:10, 30, replace = TRUE), 
 #'            category = sample(letters[1:4], 30, replace = TRUE), 
-#'            timestamp = as.POSIXct(runif(size, 1704063600, 1711922400), 
+#'            timestamp = as.POSIXct(runif(30, 1704063600, 1711922400), 
 #'                                         origin = "1970-01-01"))
 #'
 #' # test: dlabel will reveal three id-category combinations with temporal