[1c0e03]: / data-raw / ecoli_small.R

Download this file

5 lines (4 with data), 207 Bytes

1
2
3
4
library(Biostrings)
ecoli_small <- Biostrings::readDNAStringSet("data-raw/ecoli_small.fasta")[[1]]
ecoli_small <- paste0("|", paste(ecoli_small, collapse = "-"),"|")
use_data(ecoli_small, overwrite = TRUE)