modified RNA-seq.R in R (2fb25f90) · Commits · Chaos / chaos.tools

R/RNA-seq.R

+2 −2

Original line number	Diff line number	Diff line
		@@ -439,7 +439,6 @@ c.volcano <- function(
		size = point_size,
		show.legend = show_legend
		) +
		theme(axis.ticks.length = unit(0.1,"cm")) +
		facet_wrap(~ compare)

		xlimits <- max(abs(min(dt$log2FC)),abs(max(dt$log2FC))) + extend_size
		@@ -555,7 +554,8 @@ c.volcano <- function(
		plot.margin = unit(rep(1,4),'lines'),
		legend.position = legend_position,
		legend.title = element_blank(),
		text = element_text(family = font)
		text = element_text(family = font),
		axis.ticks.length = unit(0.1,"cm")
		)

		if(isTRUE(show_p))