# NOT RUN {
# download the proteome of Arabidopsis thaliana from refseq
# and store the corresponding proteome file in '_ncbi_downloads/proteomes'
file_path <- getProteome( db = "refseq",
organism = "Arabidopsis thaliana",
path = file.path("_ncbi_downloads","proteomes") )
Ath_proteome <- read_proteome(file_path, format = "fasta")
# download the proteome of Arabidopsis thaliana from genbank
# and store the corresponding proteome file in '_ncbi_downloads/proteomes'
file_path <- getProteome( db = "genbank",
organism = "Arabidopsis thaliana",
path = file.path("_ncbi_downloads","proteomes") )
Ath_proteome <- read_proteome(file_path, format = "fasta")
# }
Run the code above in your browser using DataLab