Read parameter boundary values
pr_parameters(
model,
par_ranges = system.file("extdata", "parameter_ranges.csv", package = "phenor",
mustWork = TRUE)
)
T_response = triangular_temperature_response(T = 0:45)
if (FALSE) { # \dontrun{
plot(0:45, T_response, type = "l")
} # }