| Title: | Economic Loss Estimation for Animal Disease Mortality and Morbidity |
|---|---|
| Description: | Provides standardized tools for estimating direct economic losses associated with mortality and morbidity in animal diseases. The package implements reproducible methods for calculating mortality- and morbidity-related losses using a common S3 object framework with methods for summarization, visualization, and data export. It is intended for veterinary epidemiologists, animal health economists, veterinarians, researchers, and students. |
| Authors: | Vinodhkumar Obli Rajendran [aut, cre], Keerthi Aaradhana [aut] |
| Maintainer: | Vinodhkumar Obli Rajendran <[email protected]> |
| License: | GPL (>= 3) |
| Version: | 0.1.0 |
| Built: | 2026-10-04 10:10:41 UTC |
| Source: | https://github.com/vinodhpmd/epilossr |
Convert epi_loss to data.frame
## S3 method for class 'epi_loss' as.data.frame(x, ...)## S3 method for class 'epi_loss' as.data.frame(x, ...)
x |
epi_loss object. |
... |
ignored. |
data.frame
A unified interface for estimating direct economic losses due to mortality or morbidity in animal diseases.
estimate_loss(type = c("mortality", "morbidity"), ...)estimate_loss(type = c("mortality", "morbidity"), ...)
type |
Type of loss estimation.
One of |
... |
Arguments passed to the corresponding estimation function. |
An object of class epi_loss.
estimate_loss( type = "mortality", animals = 100, mortality = 5, value = 10000 ) estimate_loss( type = "morbidity", affected = 20, duration = 10, daily_loss = 100, treatment_cost = 5000 )estimate_loss( type = "mortality", animals = 100, mortality = 5, value = 10000 ) estimate_loss( type = "morbidity", affected = 20, duration = 10, daily_loss = 100, treatment_cost = 5000 )
Calculates the economic loss associated with morbidity in animals.
morbidity_loss(affected, duration, daily_loss, treatment_cost = 0)morbidity_loss(affected, duration, daily_loss, treatment_cost = 0)
affected |
Number of affected animals. |
duration |
Average duration of illness (days). |
daily_loss |
Average production loss per animal per day. |
treatment_cost |
Total treatment cost. |
An object of class epi_loss.
morbidity_loss( affected = 20, duration = 14, daily_loss = 250, treatment_cost = 5000 )morbidity_loss( affected = 20, duration = 14, daily_loss = 250, treatment_cost = 5000 )
Calculate the economic loss due to mortality in an animal population.
mortality_loss(animals, mortality, value)mortality_loss(animals, mortality, value)
animals |
Total number of animals at risk. |
mortality |
Number of animals that died. |
value |
Monetary value per animal. |
An object of class epi_loss.
mortality_loss( animals = 100, mortality = 10, value = 50000 )mortality_loss( animals = 100, mortality = 10, value = 50000 )
Plot epi_loss object
## S3 method for class 'epi_loss' plot(x, ...)## S3 method for class 'epi_loss' plot(x, ...)
x |
epi_loss object. |
... |
ignored. |
A bar plot.
Print epi_loss object
## S3 method for class 'epi_loss' print(x, ...)## S3 method for class 'epi_loss' print(x, ...)
x |
epi_loss object. |
... |
ignored. |
Summarize an epi_loss object
## S3 method for class 'epi_loss' summary(object, ...)## S3 method for class 'epi_loss' summary(object, ...)
object |
An object of class |
... |
Additional arguments. |
Prints a summary.