using suppress message

CollinErickson · Sep 22, 2019 · d986a8b · d986a8b
1 parent b0fd00d
commit d986a8b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/scratch/scratch_hype.R b/scratch/scratch_hype.R
@@ -80,7 +80,7 @@ hype <- R6::R6Class(
     },
     add_data = function(X, Y) {
       self$ffexp <- updatedffexp
-      updatedffexp <- self$ffexp$add_level("Xdf", X)
+      updatedffexp <- self$ffexp$add_level("Xdf", X, suppressMessage=TRUE)
       stop("need to add Y too")
       invisible(self)
     },
@@ -125,7 +125,7 @@ hype <- R6::R6Class(
                                     upper=self$parupper)
       }
       newX <- EIout$par
-      updatedffexp <- self$ffexp$add_level("Xdf", newX)
+      updatedffexp <- self$ffexp$add_level("Xdf", newX, suppressMessage=TRUE)
       self$ffexp <- updatedffexp
       invisible(self)
     },