\name{org.Hs.goaSPID}
\alias{org.Hs.goaSPID}
\alias{org.Hs.goaSPID2SPAC}
\title{Maps protein to Swiss-Prot identifiers}
\description{
  org.Hs.goaSPID maps Swiss-Prot protein accession number to Swiss-Prot protein
  identifiers.
}
\details{
  Mappings were based on data provided by: GOA (\url{ftp://ftp.ebi.ac.uk/pub/databases/GO/goa/proteomes/25.H_sapiens.goa}) on
  Tue Mar 10 14:32:26 2009  
}

\examples{
	xx <- as.list(org.Hs.goaSPID)
	if(length(xx) > 0){
		# Get the value of the first key
		xx[[1]]
		# Get the values for a few keys
		if(length(xx) >= 3){
			xx[1:3]
		}
	}
	
	## For the reverse map org.Hs.goaSPID2SPAC
	xx <- as.list(org.Hs.goaSPID2SPAC)
	xx[[1]]
}