R/getSeq.R

In R2019nCoV: Analysis of 2019-nCoV Virus

#' Getting the gene sequence of 2019-nCoV virus (i.e.GenBank:MN908947)
#'
#' @return a string which is the gene sequence of 2019-nCoV
#' @export
#' @examples
#'
#' Seq <- getSeq()
getSeq <- function() {
    geneSEQ <- geneSEQ
    message("The sequence information is from GenBank:MN908947.")
    return(geneSEQ)
}