R/mapRefSeqToSymbol.R

Defines functions mapRefSeqToSymbol

mapRefSeqToSymbol <- function(refGene,myMap) {
  
  if (refGene %in% myMap$tx) {
    mySymbol= myMap$gene[myMap$tx==refGene]
  } else {stop("gene not known!")}
 
  return(mySymbol)
}
mrkbrtkhn/cTagPipe documentation built on May 31, 2021, 11:25 p.m.