library(Biostrings)
data(srPhiX174) # pretend srPhiX174 represents a DNAStringSet of *reads*
readlen = unique(width(srPhiX174)) #35
write_reads(srPhiX174, fname='./srPhiX174', readlen=readlen, paired=FALSE)
Run the code above in your browser using DataLab