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