m1 <- pcrfit(reps, 1, 2, l4)
## update model
update(m1, model = l5)
## update qPCR run
update(m1, fluo = 20)
## update data
update(m1, data = guescini1)
## update 'optim' method
update(m1, opt.method = "BFGS")
Run the code above in your browser using DataLab