dont run examples

R/predictr.R

@@ -10,7 +10,8 @@
 #' @param real_output option used when the function in called inside trainr, do not drop factor for 2 dimension array output and other actions. Let it to TRUE, the default, to let the function take care of the data.
 #' @param ... arguments to pass on to sigmoid function
 #' @return array or matrix of predicted values
-#' @examples 
+#' @examples
+#' \dontrun{ 
 #' # create training numbers
 #' X1 = sample(0:127, 7000, replace=TRUE)
 #' X2 = sample(0:127, 7000, replace=TRUE)
@@ -54,7 +55,7 @@
 #' 
 #' # plot the difference
 #' hist(  B-(A1+A2) )
-#' 
+#' }
 #' 
 predictr = function(model, X, hidden = FALSE, real_output = T,...){
 

R/trainr.R

@@ -22,6 +22,7 @@
 #' @param ... Arguments to be passed to methods, to be used in user defined functions
 #' @return a model to be used by the predictr function
 #' @examples 
+#' \dontrun{
 #' # create training numbers
 #' X1 = sample(0:127, 7000, replace=TRUE)
 #' X2 = sample(0:127, 7000, replace=TRUE)
@@ -42,6 +43,7 @@
 #'                 X=X,
 #'                 learningrate   =  0.1,
 #'                 hidden_dim     = 10   )
+#' }
 #'     
 
 trainr <- function(Y, X, learningrate, learningrate_decay = 1, momentum = 0, hidden_dim = c(10),network_type = "rnn",