From 92dbf88093384c0939469e533d2560dfbcb13d09 Mon Sep 17 00:00:00 2001
From: sgvignali <vignalisergio30@gmail.com>
Date: Fri, 16 Jul 2021 17:00:04 +0200
Subject: [PATCH] Add donttest

---
 R/maxentVarImp.R    | 2 ++
 man/maxentVarImp.Rd | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/R/maxentVarImp.R b/R/maxentVarImp.R
index 63daf5a3..1c0946b2 100644
--- a/R/maxentVarImp.R
+++ b/R/maxentVarImp.R
@@ -18,6 +18,7 @@
 #' @seealso \link{maxentTh}.
 #'
 #' @examples
+#' \donttest{
 #' # Acquire environmental variables
 #' files <- list.files(path = file.path(system.file(package = "dismo"), "ex"),
 #'                     pattern = "grd", full.names = TRUE)
@@ -38,6 +39,7 @@
 #' model <- train(method = "Maxent", data = data, fc = "l")
 #' maxentVarImp(model)
 #' }
+#' }
 maxentVarImp <- function(model) {
 
   if (.get_model_class(model) != "Maxent")
diff --git a/man/maxentVarImp.Rd b/man/maxentVarImp.Rd
index eedf9fc5..e794750a 100644
--- a/man/maxentVarImp.Rd
+++ b/man/maxentVarImp.Rd
@@ -23,6 +23,7 @@ the output is the average of the variable importance of each model trained
 during the cross validation.
 }
 \examples{
+\donttest{
 # Acquire environmental variables
 files <- list.files(path = file.path(system.file(package = "dismo"), "ex"),
                     pattern = "grd", full.names = TRUE)
@@ -44,6 +45,7 @@ model <- train(method = "Maxent", data = data, fc = "l")
 maxentVarImp(model)
 }
 }
+}
 \seealso{
 \link{maxentTh}.
 }