Conditially evaluate example for numericise.hms()

poissonconsulting · Aug 23, 2024 · 0524e1c · 0524e1c
1 parent 6e0ff29
commit 0524e1c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/R/numericise.R b/R/numericise.R
@@ -77,6 +77,7 @@ numericise.POSIXct <- function(x, ...) {
 #' @examples
 #'
 #' # hms
+#' @examplesIf requireNamespace("hms")
 #' numericise(hms::as_hms("00:01:03"))
 numericise.hms <- function(x, ...) {
   # I'm not sure if this test is needed since S3 function

diff --git a/man/numericise.Rd b/man/numericise.Rd