## simple l4 fit of F1.1 of the 'reps' dataset
pcrfit(reps, 1, 2, l4)
## same with five-parameter model
## use "GA" method for optim
pcrfit(reps, 1, 2, l5, opt.method = "GA")
## using BFGS and Nelder from 'optim'
pcrfit(reps, 1, 2, l5, opt.method = c("BFGS", "Nelder"))
## skip 'optim' method and supply
## own starting values
pcrfit(reps, 1, 2, l4, do.optim = FALSE, start = c(-5, -0.05, 11, 16))
## make a robust model
pcrfit(reps, 1, 2, l4, robust = TRUE)
## use weights
pcrfit(reps, 1, 2, l4, weights = 49:1)
Run the code above in your browser using DataLab