PhredQuality(0:40)
SolexaQuality(0:40)
IlluminaQuality(0:40)
pq <- PhredQuality(c("*+,-./", "0123456789:;"))
qs <- as(pq, "IntegerList") # quality scores
qs
as(qs, "PhredQuality")
p <- as(pq, "NumericList") # probabilities
as(p, "PhredQuality")
PhredQuality(seq(1e-4,0.5,length=10))
SolexaQuality(seq(1e-4,0.5,length=10))
IlluminaQuality(seq(1e-4,0.5,length=10))
x <- SolexaQuality(BStringSet(c(a="@ABC", b="abcd")))
as(x, "IntegerList") # quality scores
as(x, "NumericList") # probabilities
as.matrix(x) # quality scores
Run the code above in your browser using DataLab