Timing of peak carrying capacity

Returns the day-of-year on which carrying capacity is maximum

get_peak_cc(season_params)

Arguments

season_params

List of Fourier function parameters describing seasonality

Examples

season_params <- list(g0 = 0.28,
                          g = c(-0.30, -0.03, 0.17),
                          h = c(-0.35, 0.32, -0.08),
                          theta_c = 0.28)
peak_cc <- get_peak_cc(season_params)