# Applies a threshold to all nonparametric distributions in a <dist_spec>

Source:`R/dist_spec.R`

`apply_tolerance.Rd`

This removes any part of the tail of the nonparametric distributions in the <dist_spec> where the probability mass is below the threshold level.

## Examples

```
dist <- discretise(Gamma(mean = 5, sd = 1, max = 20))
apply_tolerance(dist, 0.01)
#> - nonparametric distribution
#> PMF: [8e-11 2.4e-05 0.0056 0.079 0.26 0.34 0.22 0.077 0.016]
```