---
title: "Selecting Distributions"
author: "ssdtools Team"
date: "`r Sys.Date()`"
bibliography: references.bib
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{Selecting Distributions}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.height = 4,
  fig.width = 6
)
```

## Model selection

It can be difficult to select a 'best fitting' distribution when modeling species sensitivity data with low sample sizes.
In these situations, model averaging can be used to fit multiple distributions and calculate a weighted average HCx and confidence limits [@schwarz_improving_2019].
Distributions selected to use in model averaging must be bounded by zero given that effect concentrations cannot be negative.
Furthermore, the selected distributions should provide a variety of shapes to capture the diversity of shapes in empirical species sensitivity distributions.

By default, the ssdtools uses Akaike Information Criterion corrected for small sample size (AICc) as a measure of relative quality of fit for different distributions and as the basis for calculating the model-averaged HCx.  
However, if two or more similar models fit the data well then the support for this type of shape will be over-inflated [@burnham_model_2002].  

## Default Distributions

To avoid such model redundancy [@burnham_model_2002], ssdtools and the accompanying Shiny app [@dalgarno_shinyssdtools_2021] fit three different shape distributions by default: the log-normal, log-logistic and gamma.

The three distributions are plotted below with a mean of 2 and standard deviation of 2 on the (natural) log concentration scale or around 7.4 on the concentration scale.
```{r, message=FALSE}
library(ssdtools)
library(ggplot2)

theme_set(theme_bw())

set.seed(7)
ssd_plot_cdf(ssd_match_moments(meanlog = 2, sdlog = 2)) + 
  scale_color_ssd()
```

### Log-normal distribution

The [log-normal](https://en.wikipedia.org/wiki/Log-normal_distribution) distribution was selected as the starting distribution given the data are for effect concentrations.

The log-normal distribution does have a couple limitations to consider when fitting species sensitivity data.
First, on the logarithmic scale, the normal distribution is symmetrical.
Second, the log-normal distribution decays too quickly in the tails giving narrow tails which may not adequately fit the data.
Additional distributions were selected to compensate for these deficiencies.  

### Log-logistic distribution

The [log-logistic](https://en.wikipedia.org/wiki/Log-logistic_distribution) distribution is often used as a candidate SSD primarily because of its analytic tractability [@aldenberg_confidence_1993].
We included it because it has wider tails than the log-normal and because it is a specific case of the more general Burr family of distributions [@shao_estimation_2000, @burr_cumulative_1942].

### Gamma distribution

The [gamma](https://en.wikipedia.org/wiki/Gamma_distribution) distribution is a two-parameter distribution commonly used to model failure times or time to events.
For use in modeling species sensitivity data, the gamma distribution has two key features that provide additional flexibility relative to the log-normal distribution: 1) it is non-symmetrical on the logarithmic scale; and 2) it has wider tails.
The Weibull distribution was considered as an alternative but the Gamma distribution is generally more flexible.  

## All Distributions

For completeness the hazard concentrations for the other stable distributions provided by `ssdtools` are plotted below with a mean of 2 and standard deviation of 2 on the (natural) log concentration scale.
```{r,fig.height=5}
set.seed(7)
ssd_plot_cdf(ssd_match_moments(dists = ssd_dists_all(), meanlog = 2, sdlog = 2)) +
  theme(legend.position = "bottom") + 
  scale_color_ssd()
```

-----

<a rel="license" href="https://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons Licence"
style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a><br /><span
xmlns:dct="http://purl.org/dc/terms/" property="dct:title">ssdtools</span> by <span
xmlns:cc="http://creativecommons.org/ns#" property="cc:attributionName">the Province of British Columbia
</span> is licensed under a <a rel="license" href="https://creativecommons.org/licenses/by/4.0/">
Creative Commons Attribution 4.0 International License</a>.

## References
