diff --git a/R/pseudobulk.R b/R/pseudobulk.R index 43164e1..31c46d9 100644 --- a/R/pseudobulk.R +++ b/R/pseudobulk.R @@ -150,7 +150,7 @@ pseudobulk_id <- function(factor_df) { #' treatment=dummy_variable(c("control", "treated"))) #' #' obj <- rule(simulated_umis, "T", "CD3E",">", 1e-4) -#' \dontrun{ # > 5 s in CRAN check +#' \donttest{ # > 5 s in CRAN check #' dds <- class_to_deseq2(obj, meta_data, "T", ~ treatment) #' } class_to_deseq2 <- function(obj, meta_df, class, design = ~ condition) { diff --git a/man/class_to_deseq2.Rd b/man/class_to_deseq2.Rd index 0b79e2d..c6947ef 100644 --- a/man/class_to_deseq2.Rd +++ b/man/class_to_deseq2.Rd @@ -66,7 +66,7 @@ meta_data <- data.frame(patient=dummy_variable(paste0("patient", 1:6)), treatment=dummy_variable(c("control", "treated"))) obj <- rule(simulated_umis, "T", "CD3E",">", 1e-4) -\dontrun{ # > 5 s in CRAN check +\donttest{ # > 5 s in CRAN check dds <- class_to_deseq2(obj, meta_data, "T", ~ treatment) } }