diff --git a/R/biting_process.R b/R/biting_process.R index 801aea20..279802ea 100644 --- a/R/biting_process.R +++ b/R/biting_process.R @@ -210,9 +210,7 @@ simulate_bites <- function( calculate_eir <- function(species, solvers, variables, parameters, timestep) { a <- human_blood_meal_rate(species, variables, parameters, timestep) infectious <- calculate_infectious(species, solvers, variables, parameters) - age <- get_age(variables$birth$get_values(), timestep) - psi <- unique_biting_rate(age, parameters) - infectious * a * mean(psi) + infectious * a } effective_biting_rates <- function(a, .pi, p_bitten) {