Commit 35a20486 authored by Chaos's avatar Chaos
Browse files

update chaos_anno

parent 5c08304e

NAMESPACE

+1 −1
Original line number Diff line number Diff line
@@ -8,7 +8,7 @@ import(tidyfst) 
import(pheatmap)

import(ggplot2)

import(stringr)

import(patchwork)

import(patchwork)l

import(kableExtra)

import(ggseqlogo)

import(edgeR)

R/utilities.R

+4 −2
Original line number Diff line number Diff line
@@ -21,7 +21,7 @@ chaos_create_dir <- function( 
	if(!dir.exists(dir)){dir.create(dir)}

}



chaos_anno <- function(organism,type){

chaos_anno <- function(organism,type = NA){

	if(organism == "human"){

		ref <- "hg38"

		anno_v <- "v42"
@@ -29,7 +29,9 @@ chaos_anno <- function(organism,type){ 
		ref <- "mm39"

		anno_v <- "vM31"

	}

	if(type == "ref"){

	if(is.na(type)){

		c(ref,anno_v)

	}else if(type == "ref"){

		ref

	}else if(type == "anno_v"){

		anno_v

CRA Git | Maintained and supported by SUSTech CRA and CCSE