diff --git a/R/Stringendo.R b/R/Stringendo.R index 62575a2..f3b46ea 100644 --- a/R/Stringendo.R +++ b/R/Stringendo.R @@ -186,8 +186,11 @@ ifExistsAndTrue <- function(varname = "pi") { #' @param alternative Value to return if `varname` is not defined. #' @param v Logical indicating whether to print informative messages. Default is `FALSE`. #' -#' @examples ifExistsElse("pi") +#' @examples +#' \dontrun{ +#' ifExistsElse("pi") #' ifExistsElse("pi22") +#' } #' #' @export ifExistsElse <- function(varname, alternative = "define an alternative", v = FALSE) { diff --git a/man/ifExistsElse.Rd b/man/ifExistsElse.Rd index f10d23c..fcae831 100644 --- a/man/ifExistsElse.Rd +++ b/man/ifExistsElse.Rd @@ -18,7 +18,9 @@ Returns the value of \code{varname} when it exists; otherwise returns \code{alte When \code{v} is \code{TRUE}, a message is printed indicating whether the variable was found. } \examples{ +\dontrun{ ifExistsElse("pi") ifExistsElse("pi22") +} }