diff --git a/R/ClassFilter.R b/R/ClassFilter.R index 197d9eb..6c69c0e 100644 --- a/R/ClassFilter.R +++ b/R/ClassFilter.R @@ -69,8 +69,8 @@ w4m_filter_imputation <- #' expecteds <- c(stats::var(c(1,2,3)),stats::var(c(5,7,11)),stats::var(c(13,17,19))) #' base::all.equal(rowvars, expecteds) #' colvars <- w4m__var_by_rank_or_file(m = m, dim = 2) -#' expecteds <- c(var(c(1,5,13)),var(c(2,7,17)),var(c(3,11,19))) -#' all.equal(colvars, expecteds) +#' expecteds <- c(base::var(c(1,5,13)),base::var(c(2,7,17)),base::var(c(3,11,19))) +#' base::all.equal(colvars, expecteds) #' #' @export w4m__var_by_rank_or_file <- function(m, dim = 1) {