# NOT RUN {
# This example requires the external prodigal software
# Using a genome file in this package.
xpth <- file.path(path.package("microseq"),"extdata")
genome.file <- file.path(xpth,"small_genome.fasta")
# Searching for coding sequences, and inspecting
gff.tbl <- findGenes(genome.file)
# Retrieving the sequences
genome <- readFasta(genome.file)
cds <- gff2fasta(gff.tbl, genome)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab