## Not run:
#
# # download the genome of Arabidopsis thaliana from refseq
# # and store the corresponding genome file in '_ncbi_downloads/genomes'
# getGenome( db = "refseq",
# kingdom = "plant",
# organism = "Arabidopsis thaliana",
# path = file.path("_ncbi_downloads","genomes"))
#
# file_path <- file.path("_ncbi_downloads","genomes","Arabidopsis_thaliana_genomic.fna.gz")
# Ath_genome <- read_genome(file_path, format = "fasta")
#
#
# # download the genome of Arabidopsis thaliana from genbank
# # and store the corresponding genome file in '_ncbi_downloads/genomes'
# getGenome( db = "genbank",
# kingdom = "plant",
# organism = "Arabidopsis thaliana",
# path = file.path("_ncbi_downloads","genomes"))
#
# file_path <- file.path("_ncbi_downloads","genomes","Arabidopsis_thaliana_genomic.fna.gz")
# Ath_genome <- read_genome(file_path, format = "fasta")
# ## End(Not run)
Run the code above in your browser using DataLab