library(restez)
restez_path_set(tempdir())
demo_db_create(n = 5)
# return fasta record
fasta_res <- entrez_fetch(db = 'nucleotide',
id = c('demo_1', 'demo_2'),
rettype = 'fasta')
cat(fasta_res)
# return whole GB record in text format
gb_res <- entrez_fetch(db = 'nucleotide',
id = c('demo_1', 'demo_2'),
rettype = 'gb')
cat(gb_res)
# NOT RUN
# whereas these request would go through rentrez
# fasta_res <- entrez_fetch(db = 'nucleotide',
# id = c('S71333', 'S71334'),
# rettype = 'fasta')
# gb_res <- entrez_fetch(db = 'nucleotide',
# id = c('S71333', 'S71334'),
# rettype = 'gb')
# delete demo after example
db_delete(everything = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.