The true PR is pτ(a|h)=1−e−mτ(a|h)
Arguments
- a
the host cohort age
- FoIpar
parameters that define an FoI function
- tau
the cohort birthday
- hhat
a local scaling parameter for the FoI
- r
the clearance rate for a simple infection
Value
a numeric vector of length(a)