concd <- c(-9, -8, -7, -6, -5, -4)
respd <- c(0, 2, 30, 40, 50, 20)
maskd <- c(0, 0, 0, 0, 0, 1)
# run hill only
fit_modls(concd, respd, modls = "hill")
# run hill only + increasing direction only
fit_modls(concd, respd, modls = "hill", hill_pdir = 1)
# run cc2 only + change of classSD
fit_modls(concd, respd, modls = "cc2", cc2_classSD = 10)
# run hill + cnst
fit_modls(concd, respd, modls = c("hill", "cnst"))
# run with mask at the highest concentration
fit_modls(concd, respd, maskd, modls = "hill")
Run the code above in your browser using DataLab