if (FALSE) {
library(RPPanalyzer)
data(ser.dil.samples)
ser.dil_median <- sample.median(ser.dil.samples)
predicted.data <- calcSdc(ser.dil_median,D0=2,sel=c("measurement"), dilution="dilution")
}
Run the code above in your browser using DataLab