6 files changed, 7 insertions, 7 deletions
diff --git a/R/coef.gensvm.grid.R b/R/coef.gensvm.grid.R
index f9908ba..7b12d26 100644
--- a/R/coef.gensvm.grid.R
+++ b/R/coef.gensvm.grid.R
@@ -26,7 +26,7 @@
 #' @importFrom stats coef
 #'
 #' @examples
-#' \dontrun{
+#' \donttest{
 #' x <- iris[, -5]
 #' y <- iris[, 5]
 #'
diff --git a/R/gensvm.grid.R b/R/gensvm.grid.R
index 599b588..e76e17e 100644
--- a/R/gensvm.grid.R
+++ b/R/gensvm.grid.R
@@ -130,7 +130,7 @@
 #' x <- iris[, -5]
 #' y <- iris[, 5]
 #'
-#' \dontrun{
+#' \donttest{
 #' # use the default parameter grid
 #' grid <- gensvm.grid(x, y, verbose=TRUE)
 #' }
@@ -142,7 +142,7 @@
 #' # print the result
 #' print(grid)
 #'
-#' \dontrun{
+#' \donttest{
 #' # Using a custom scoring function (accuracy as percentage)
 #' acc.pct <- function(yt, yp) { return (100 * sum(yt == yp) / length(yt)) }
 #' grid <- gensvm.grid(x, y, scoring=acc.pct)
diff --git a/R/gensvm.refit.R b/R/gensvm.refit.R
index 54040f4..d9c399a 100644
--- a/R/gensvm.refit.R
+++ b/R/gensvm.refit.R
@@ -60,7 +60,7 @@
 #' fit <- gensvm(x, y)
 #' fit2 <- gensvm.refit(fit, x, y, epsilon=1e-8)
 #'
-#' \dontrun{
+#' \donttest{
 #' # refit a model returned by a grid search
 #' grid <- gensvm.grid(x, y)
 #' fit <- gensvm.refit(fit, x, y, epsilon=1e-8)
diff --git a/R/plot.gensvm.grid.R b/R/plot.gensvm.grid.R
index c755c3c..ca37166 100644
--- a/R/plot.gensvm.grid.R
+++ b/R/plot.gensvm.grid.R
@@ -25,7 +25,7 @@
 #' @export
 #'
 #' @examples
-#' \dontrun{
+#' \donttest{
 #' x <- iris[, -5]
 #' y <- iris[, 5]
 #'
diff --git a/R/predict.gensvm.grid.R b/R/predict.gensvm.grid.R
index d6f5e06..9d0bc53 100644
--- a/R/predict.gensvm.grid.R
+++ b/R/predict.gensvm.grid.R
@@ -35,7 +35,7 @@
 #' @importFrom stats predict
 #'
 #' @examples
-#' \dontrun{
+#' \donttest{
 #' x <- iris[, -5]
 #' y <- iris[, 5]
 #'
diff --git a/R/print.gensvm.grid.R b/R/print.gensvm.grid.R
index d0755ca..8aaee12 100644
--- a/R/print.gensvm.grid.R
+++ b/R/print.gensvm.grid.R
@@ -25,7 +25,7 @@
 #' @export
 #'
 #' @examples
-#' \dontrun{
+#' \donttest{
 #' x <- iris[, -5]
 #' y <- iris[, 5]
 #'