## on single curve
## using baseline shifting
m1 <- pcrfit(reps, 1, 2, l5)
maxRatio(m1, baseshift = 0.3)
## on a 'modlist'
## using 'baseline shifting'
ml1 <- modlist(reps, model = l5)
maxRatio(ml1, baseshift = 0.5)
Run the code above in your browser using DataLab