update (89859845) · Commits · Chaos / chaos.tools

R/RNA-seq.R

+4 −4

Original line number	Diff line number	Diff line
		@@ -262,25 +262,25 @@ volcano_plot <- function(
		plot <- ggplot() +
		geom_point(
		data = dt[color == "not_sig"],
		aes(log2FC,log10P,color = color),
		aes(log2FC,log10P,color = color_ns),
		size = 0.8,
		show.legend = show_legend
		) +
		geom_point(
		data = dt[color == "up"],
		aes(log2FC,log10P,color = color),
		aes(log2FC,log10P,color = color_up),
		size = 0.8,
		show.legend = show_legend
		) +
		geom_point(
		data = dt[color == "down"],
		aes(log2FC,log10P,color = color),
		aes(log2FC,log10P,color = color_down),
		size = 0.8,
		show.legend = show_legend
		) +
		geom_point(
		data = dt[color == special_label],
		aes(log2FC,log10P,color = color),
		aes(log2FC,log10P,color = color_special),
		size = 0.8,
		show.legend = show_legend
		) +