Commit 5ffe7cfc authored by Chaos's avatar Chaos
Browse files

update

parent 2d3f9905
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -189,7 +189,7 @@ volcano_plot <- function(
	if(is.null(sub_gene)){sub_gene <- .data$gene_name}
	if(is.null(sub_id)){sub_id <- .data$gene_id}

	special_gene <-	special_gene %>% .[. %in% dt$gene_name]
	special_gene <-	special_gene %>% .[. %in% .data$gene_name]

	if(length(special_gene) == 0){
		special_gene <- NULL