Commit 1c1ec6ee authored by Chaos's avatar Chaos
Browse files

update

parent 1138b67b
Loading
Loading
Loading
Loading
+8 −2
Original line number Diff line number Diff line
@@ -734,7 +734,7 @@ rnaseq123_multi <- function(
						levels = colnames(design)
					)

	x %>%
	dt <-	x %>%
			voomWithQualityWeights(design, plot = F) %>%
			lmFit(design) %>%
			contrasts.fit(contrasts = contr.matrix) %>%
@@ -742,7 +742,13 @@ rnaseq123_multi <- function(
			topTable(n = Inf) %>%
			as.data.table() %>%
			.[,log10P := -log10(adj.P.Val)] %>%
	merge(gtf_info[,.(gene_id,gene_name,type)])
			merge(gtf_info)

	if("logFC" %in% colnames(dt)){
		setnames(dt,"logFC","log2FC")
	}

	dt
}

## the input data for venn_plot should come from rnaseq123_multi()