### compare two models, four-parameter and five-parameter
m1 <- multdrc(F1.1 ~ Cycles, data = reps, fct = l4())
m2 <- multdrc(F1.1 ~ Cycles, data = reps, fct = l5())
evidence(m2, m1)
### ratio of two AIC's
evidence(-120, -123)
Run the code above in your browser using DataLab