continued intersection analysis

dge_workflow/featcounts_deseq.R

@@ -51,7 +51,7 @@ resultsBase <- count_matrix_file %>% basename() %>% trim_ext(".txt") %>% trim_ex
 countData <- read.delim(count_matrix_file)
 
 #' strucutre of input matrix was
-glimpse(countData)
+glimpse(countData, width=60)
 
 countMatrix <- countData %>% column2rownames("ensembl_gene_id") %>% as.matrix()