# NOT RUN {
## if Biostrings package is available
if (requireNamespace("Biostrings", quietly=TRUE))
{
## load data set
filepath <- system.file("examples", "ch22Promoters.fasta",
package="apcluster")
ch22Promoters <- Biostrings::readDNAStringSet(filepath)
## display sequences
ch22Promoters
}
# }
Run the code above in your browser using DataLab