\name{getFASTAname}
\alias{getFASTAname}
\title{ Obtain sequence name from FASTA object }
\description{
  Extract the name of a sequence from a FASTA object that created by
  \code{readFASTA} function from \code{Biostrings} package.
}
\usage{
getFASTAname(Fobj)
}
\arguments{
  \item{Fobj}{ is a FASTA object created by \code{\link[Biostrings]{readFASTA}} function
  from \code{\link[Biostrings]{Biostrings}} package.}
}
\details{
  The function gets the first string between ">" and space the "desc"
  element of the \code{Fobj}, which is the names of the sequence.
}
\value{
  A character string.
}
\author{ Z. Jiang }
\seealso{ \code{\link[Biostrings]{readFASTA}} }
\examples{
f <- gzfile(file.path(.path.package("SLGI"), "extdata/orf_trans.fasta.gz"), open = "rt")
library(Biostrings)
yeastF <- readFASTA(f)
sapply(yeastF[1:5],getFASTAname)
}
\keyword{methods}