diff --git a/R/functions_SE.R b/R/functions_SE.R index 2b02d851..d5e689fc 100755 --- a/R/functions_SE.R +++ b/R/functions_SE.R @@ -1093,6 +1093,10 @@ get_differential_transcript_abundance_deseq2_SE <- function(.data, } my_contrasts = .contrasts + + if (!inherits(assays(.data)[[1]], 'matrix')){ + assays(.data)[[1]] <- as.matrix(assays(.data)[[1]]) + } deseq2_object = .data %>%